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Announcing 
"Hellfire 
Warrior", 
a fantastic 
new Dunjonquest 
computer game... 
that's really 
not for 
everybody: 
Beginners 
are likely to 
be gobbled up 
in the first 
room... and 
there are over 
200 rooms on 
four levels 



"Hellfire Warrior." Really not for everybody: newcomers to 
Dunjonquest should begin with something easier. Here the 
monsters are deadlier, the labyrinths more difficult, the levels 
far more challenging... 



But for the experienced Dunjonquest game player there are more 
command options, more potions (131). more magical items (including — 
at last — magical armor), more special effects, more surprises. And an 
innkeeper, an armorer, apothecary and magic shops. 

In part a sequel to The Temple of Apshai. up until now the greatest 
of all the Dunjonquest games. Hellfire Warrior can also be played 
completely on its own. 

Now the character you've created, re- 
presenting the highest level of role- 
playing to date, can explore the four 
new lower levels: 

Level S— "The Lower Reaches 
of Apshai.'' With the giant in- 
sects and other nasties that swarmed through the 
upper levels of Apshai. With rooms your hero can 
get into, but not out of. 

Level 6— "The Labyrinth." The only exit is hidden 
within the Labyrinth. And man-eating monsters can thwart 
your hero. 

Level 7— "The Vault of the Dead. "...And of the 
undead — skeletons, ghouls, mummies, specters... 
invisible ghosts — lurking in the rooms, doors, secret 
passages, ready to reduce your hero to a pale shadow of 
himself. Permanently. 

Level 8— "The plains of Hell." In an Underworld of 
lost souls and shades of dead, of dragons and fiery 
hounds, of bottomless pits and blasts of hellfire. our 
hero must rescue the beautiful warrior maiden lying 
in enchanted sleep within a wall of fire. And bring 

her past unbelievable dangers and monsters... 

even Death itself. ..to sun and air and life 

itself. 




Hellfire Warrior. The most exciting game yet 
from Automated Simulations, the leading producer of 
computer fantasy games. 

Guaranteed: If it's not the most exciting computer 
game you've played, return it within ten days for a 
complete refund. 

Available on disk for the Apple II and Radio 
Shack's TRS80, or on cassette for the TRS80 
and for the Commodore PET. The cassette: 
SZ4.9S: the disk: SZ9.9S. Complete with a 
magnificent instruction manual. Some of 
the drawings in the manual are reproduced 
here (in greatly reduced scale). 

Use the handy coupon or. if you wish to order by MasterCard or VISA, use our toll-free 
phones: In the United States: operator 861 (800) 824-7888: In California: operator 
861 (800) 8SZ-7777: In Hawaii and Alaska: operator 861 (800) 824-7919. 





AUTOMATED SIMULATIONS, INC. 

P. 0. Box 4247. Dept. DH Mountain View. CA 94040 



I i Yes. I want Hellfire Warrior. On a satisfaction-guaranteed/ 
full-money-back policy. Please send me the Hellfire Warrior on: 

S 



Disk for TRS-80 (32K. TRSDOS) @ S29.95 

Disk for Apple (48K with Applesoft in 
ROM) @ S29.95 

Cassette for TRS-80 (16K. Level II) 
@ S24.95 

Cassette for Commodore PET (32K, old or 
new ROMS) @ S24.95 



Sub Total 

Plus shipping & handling SI. 00 each 

'Plus sales tax for California residents 

TOTAL 



D I enclose my check in the amount of 

P Please charge to my □ VISA or D MasterCard account 

My card no Expires 

Signature . — 

Name 



Address . 



City/State/Zip 

•California residents: please add 6% or 6'h% sales tax as required. 



□ Please send me your complete catalogue of computer and board fantasy games. 



LOWER CASE +PLUS 

by LAZER SYSTEMS 

for the Apple II 



$59.95 



at better computer stores 
everywhere. Or, order 
direct from us. 

Calif, residents add 6% 
sales tax. 

Allow 3 weeks for delivery. 

Outside continental U.S.A. 

shipping charges will be 

added. 

Dealer inquiries invited. 




CHECK THESE FEATURES: 

LOWER CASE CHARACTERS: 

Put normal and inverse lower case characters on the Apple 

II text screen. 

CAPATIBTLITY: 

The Lower Case + Plus is compatible with word processors 

and text editors that utilize a lower case adapter to put 

lower case on the screen. 

RESET DISABLE: 

You can disable the reset key or control the reset disable 

with external switching through the expansion socket. 

2 CHARACTER SETS: 

There are two complete character sets, on board, in the 

Lazer Systems exclusive character generator. The first set 

is a word processing set and the second is a HI-RES 

graphics set. Character set selection is accomplished 

through the expansion socket. 

SOFTWARE: 

Standard BASIC software comes on diskette with each 

Lower Case +Plus. Pascal software is available for S9.95 

extra. 

2716EPROM: 

The Lazer Systems character generator is pin for pin 

compatible with the 2716 EPROM. This will allow you to 

design you own character set for use with this board. The 

character font is compatible with Mnt. Hardware's ROM + 

and other character generator programs to make it easy for 

you to build your own character set for the 2716 EPROM. 

GRAPHICS: 

You can do extremely fast HI-RES graphics on the text 

page by using graphics character set or by purchasing the 



GRAPHICS +PLUS board listed below. This does not 

require the use of the 8K HI-RES page. 

EXPANSION: 

The on board expansion socket will let you control the reset 

key disable and character set selection with either a 

hardware switch or software control. It will also allow you 

to have an external character set in RAM that you can 

control & re-define with software. 

DOCUMENTATION: 

You get a 12 page documentation booklet to show you how 

to control the fantastic capabilities of this board. 

COMING PRODUCTS TO SUPPORT 
THE LOWER CASE +PLUS: 

KEYBOARD +PLUS: 

This board will plug directly onto the Lower Case +Plus 
and will allow you to control the upper-lower case with the 
shift key as well as giving you a hardware keyboard buffer 
that will allow you to enter commands and other inputs 
while the processor is out handling other operations such 
as disk 1/0. Look for it in December 1980. 

GRAPHICS +PLUS: 

This graphics board will take full advantage of the Lower 
Case + Plus board's expansion socket. It will allow 
software controle of the reset disable, character set 
selection and control of a RAM based character set. With 
this board, you will be able to do extremely fast HI-RES 
graphics on the text page simply by defining and re- 
defining the character set that is provided in RAM on this 
board. Look for it in February 1981. 



P.O. Box 55518 • Riverside, Ca 92517 



Southeastern Software 



6414 Derbyshire Drive • 
504/246-8438 



New Orleans, LA 701 26 
504/246-7937 




Southeastern Software 'NEWSLETTER' for APPLE li Owners 

NOW IN THE THIRD YEAR OF PUBLICATION 

1 Issues per year for $1 0.00 

Back Issues available at $1 .00 each 

EXAMPLE: 

Send $10.00 and receive next 10 Issues 

Send $30.00 and receive 30 Issues beginning with #2 



DATA CAPTURE 3.0 - $29.95 

Is DATA CAPTURE 3.0 just another Smart Termi- 
nal program? NO! It is a GENIUS Terminal pro- 
gram for use with the Micromodem II®. It will 
'capture' ANYTHING that appears on the screen 
of your CRT. ANY program or data. If you are 
using the Source you can even 'capture' CHAT. 
There is no need to create files in your file space 
on the other system to transfer data to your Apple. 
If you can list it you can capture it. 

* You can then SAVE the data to disk, dump it 
to your printer or even do simple editing with 
DATA CAPTURE 3.0. 

* You can use DATA CAPTURE 3.0 to com- 
pose text off line for later transmission to 
another computer. Think of the timeshare 
charges this will save you! 

* Use DATA CAPTURE 3.0 with the Dan 
Paymar Lower Case Adapter and you can 
enter UPPER or lower case from the key- 
board for transmission to another system. 
You can also capture UPPER/lower case 
data from another system. 

* A program is also included to convert your 
programs to text files for transmission using 
DATA CAPTURE 3.0. 

* DATA CAPTURE 3.0 will save you money if 
you are using any timesharing system. 

Requires DISK II®, Applesoft II® 

Add $64.95 to order the Dan Paymar Lower Case 
Adapter 

BAD BUY DISKETTE - $9.99 

Of course it's a bad buy. If you have issues #2 thru 
#11 of the NEWSLETTER you can type these 
programs in yourself. Includes a couple of bonus 
programs. 

Requires DISK II®, Applesoft II® 



We ship within 3 working days of receipt of 
order and welcome your personal check. 
We also accept Visa and Master Charge. 



LCMOD for PASCAL - $30.00 

Finally! DIRECT entry of UPPER/lower case into 
the Pascal Editor. Why pay hundreds of dollars for 
a terminal just to set lower case entry with Pascal? 
If you have the Paymar Lower Case Adapter you 
can use this program. 

* Left and right curly brackets for comment 
delimiters. 

* An underline for VARs, program names and 
file names. 

* The ESCape key does the shifting and Con- 
trol Q is used for ESCape. Have you ever 
typed in a page or two of text and lost it by 
hitting ESC accidentally? This won't happen 
with LCMOD. 

Requires Language System and Paymar LCA 

Add $64.95 to order the Dan Paymar Lower Case 
Adapter. 

MAG FILES - $18.00 

Finding it difficult to keep track of all those 
magazine articles you are reading? This program 
will help you do it. MAG FILES is Menu driven with 
separate modules for creating, editing, displaying 
and searching for your data. If you are using one 
drive a program is provided for transferring data to 
another diskette for backup. A sample data base 
of over 60 articles is included. The screen format- 
ting and user orientation are what you have come 
to expect of Southeastern Software. 

Requires DISK II®, Applesoft II®. 
MAILER -$15.00 

Don't let the low cost fool you. This is a single drive 
version of the program we use to maintain the 
NEWSLETTER subscriber list. Can be easily con- 
verted to 2.3 or 4 drives. Binary search and linear 
searches for finding any name in file. Sort on 
names and zip codes. Selective print by zip code 
or key. The separate modules are menu driven 
and will run on 32K system. There are 1 3 separate 
modules on the diskette for maintaining a mailing 
list. Sample data file included. 

Requires DISK II®, Applesoft II®. 



* Apple, Apple II Plus, Disk II and APPLESOFT II are trademarks of Apple Computer Company. 

• Micromodem II is a trademark of D.C. Hayes Associates, Inc. 
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The Standard For Small Business Accounting 



TM 



GENERAL LEDGER SYSTEM 

BALANCE SHEET 

PROFIT & LOSS STATEMENT 

CASH DISBURSEMENTS JOURNAL 

(Check Register) 

SALES JOURNAL 

(Invoice Register) 

CASH RECEIPTS JOURNAL 

MERCHANDISE PURCHASED JOURNAL 

CASH SALES JOURNAL 

GENERAL JOURNAL 

ACCOUNTS RECEIVABLE LEDGER 

ACCOUNTS PAYABLE LEDGER 

PAYROLL LEDGER 

ACCOUNTS RECEIVABLE SYSTEM 

OPEN ITEM OR BALANCE FORWARD 
COMPLETE ACCOUNT AGING 
LIFE-TO-DATE CUSTOMER HISTORY 
COMPLETE ACCOUNT ANALYSIS 
(Up to 16 Reports) 
ITEMIZED STATEMENT PRINTING 
CUSTOMER MAILING LIST GENERATION 
500 PROMPTED CUSTOMERS PER DISKETTE 
(No Limit to Number of Diskettes) 
1000 TRANSACTIONS PER PERIOD 
SKELETON GENERAL LEDGER PREPARED 
AUTOMATIC INTERFACE WITH BPI INVENTORY 

SYSTEM 
AUTOMATIC POSTING TO BPI GENERAL LEDGER 

INVENTORY/ORDER ENTRY 

FIFO, LIFO, AVERAGING 

900 - 2000 LINE ITEMS 

INSTANT INVENTORY QUERY 

AUTOMATIC BACK-ORDER HANDLING 

AUTOMATIC RE-ORDER LEVELS 

INVENTORY TURN ANALYSIS 

POINT-OF-SALE OPERATION 

PRICE TAG PRINTING 

INVENTORY PROFIT & LOSS STATEMENT 

PURCHASE ORDER GENERATION 

NON-INVENTORY ITEM HANDLING 

ALWAYS IN BALANCE WITH GENERAL LEDGER 

AUTOMATIC INTERFACE WITH BPI A/R SYSTEM 

AUTOMATIC POSTING TO BPI GENERAL LEDGER 



AVAILABLE AT YOUR DEALER 

DESIGNED AND DEVELOPED BY 

— BPI SYSTEMS, INC.— 

A unique combination of Accounting, 
Business and Programming expertise dedi- 
cated to making the BPI GENERAL ACCOUNT- 
ING SYSTEM the finest system in use through- 
out the world. . . 

THE STANDARD FOR 
SMALL BUSINESS ACCOUNTING ™ 



Why do we claim the BPI SYSTEM to be the STANDARD for SMALL 
BUSINESS ACCOUNTING? 

Because it was designed BY BUSINESS and ACCOUNTING PRO- 
FESSIONALS— not programmers. 

It lets a business run the way it DOES— not the way a group of programmers 

THINKS it should. 

Why is it the MOST POPULAR Small Business Accounting System 

on the market today? 

Because it is FAST, EASY TO USE, FULLY INTEGRATED, DESIGNED FOR THE 

FIRST-TIME USER and SUPPORTED and SUPPORTED. 

SUPPORTED by BPI SYSTEMS and SUPPORTED by SOLUTIONS, INC. 

SUPPORTED by BPI SYSTEMS to assure you THE SYSTEM will be IMPROVED 
and EXPANDED to give you the most complete and useable accounting sys- 
tem available at any price. 

SUPPORTED by SOLUTIONS, INC. to assure you of fast update materials, the 
latest information and a PROFESSIONAL approach to APPLICATION Marketing 
and Distribution. 



DESIGNED FOR MICROCOMPUTERS MANUFACTURED BY - 

APPLE COMPUTER BELL & HOWELL 
COMMODORE 



FEATURES 

• Chart of Accounts — over 500. 

• Up to Ten separate profit centers, each with a complete set of financial 
statements— PLUS a set of consolidated statements. 

• Accounts Payable — over 200 PROMPTED payees. 

• Accounts Receivable — over 500 PROMPTED customers per diskette. 

1000 transactions per period. 

Up to 16 REPORTS for ACCOUNT ANALYSIS. 

• Inventory — From 900 fo 2000 line items. 

• All sections may be used independently. 

• Designed for APPLE, BELL & HOWELL and COMMODORE microcomputers. 

• THOUSANDS IN USE today by BUSINESSES, C.P.A.'s and BOOKKEEPERS. 



". . .approved by Arthur Anderson, the accounting firm, and has been accepted 
by Commodore as its factory-approved accounting system." 



VENTURE Magazine, September 1980 

DEALER INQUIRIES INVITED 
Distributed By 



3740 Colony Drive 

San Antonio, Texas 78230 

(512) 690-1017 

The Source: TCI 170 



Software Distribution 

This editorial is in two parts. Part 2 
will appear next month. 



Parti 



You have written a piece of software you think is pretty 
good and which you feel would be of interest to other com- 
puterists. You decide that you would like to distribute it in 
some manner for three reasons: 1. you are a "nice guy" and 
want to help your fellow computerists; 2. you would like to 
get some credit and recognition for the good programming 
that you have done; and 3. you would like to make a few 
dollars. Now the problem arises: how do you distribute this 
software most effectively to serve the above purposes? 
There are a number of options, and I will cover them here. 

Give it away. Your product may not be marketable for 
money for a variety of reasons, or you may simply not care 
about a limited return on a marketing or sales effort. Soft- 
ware which would not be marketable would include that 
which is too limited in interest and/or application, such as a 
driver for a very uncommon piece of peripheral equipment; 
a game or demonstration program which is not significant- 
ly different from other products on the market; a utility 
which is too small to be a saleable item; or a program which 
would cost too much of your time and effort to document to 
the point required to make it marketable. There are, I am 
sure, other reasons for nor selling your software, but, you 
get the idea. If you choose not to sell your software, you 
may want to let others use it by giving it away. This may be 
done in several ways. Donate it to your local computer club 
library; donate it to a national user group for your 
microcomputer; send it to a magazine which does not pay 
for articles; etc. 

Sell it as a software package. Assuming that your pro- 
duct has a more than minimal potential market value, what 
is the best way to make money on it? There are two major 
routes to selling a software package. First, and most ob- 
vious, is to package and sell it yourself. Any software which 



you plan to sell should be well documented. This is a major 
stumbling block for many computerists. Programming is 
fun; documenting is a drag. If you are going to sell it 
yourself, then you are solely responsible for writing, 
editing, and printing the documentation, and you must han- 
dle sales by mail order and/or through dealers. While this 
method may have the greatest reward (my company is 
founded on the profits from a $10.00 demonstration 
package for the KIM-1), it entails the most work and 
greatest risk. MICRO tries to aid this type of effort via its 
free MICRO Software Catalog, and a number of people have 
been very successful using this service to get started. 

The second common sales method is to work though an 
existing software distributing company. A number of these 
are connected with major computer magazines such as 
Creative Computing and Kilobaud Microcomputing. Others 
are independent and may or may not concentrate on a par- 
ticular market segment such as 6502, TRS-80, APPLE, etc. 
You will normally be expected to provide good documenta- 
tion, but you may also get some help from the company. All 
of the risk and effort of marketing are borne by the com- 
pany and you receive a royalty, usually a fixed percentage 
of the selling price. This percentage may be quite low. I 
know of one case where an individual's software was ap- 
proximately one-ninth of a total package being sold for 
$150.00, and his payment per copy was 25 cents, which 
came to approximately 0.16 percent (0.0016 cents on the 
dollar)! The normal royalty payment will be higher. Be sure 
you shop around. Prices can vary considerably. Also con- 
sider the total distribution. A large-volume distributor may 
offer you less per copy than a smaller distributor, but may 
sell many more copies. 
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The Sporting Micro 
Cover Artist 
Terry Allen 



The cover depicts, tongue-in-cheek, a 
micro being used to score a medieval 
joust. Actually, a micro is ideally suited 
for scoring and keeping track of our far 
more complicated modern sports. 

Timing: Numerous sports require ac- 
curate timing. A micro makes the ideal 
controller for a basketball clock, 
automatic race timer, auto race lap- 
time/speed calculator, and so on. The 
input may be manual and not require 
any additional peripheral equipment, or 
may be generated by various peripheral 
devices. 

Statistics: Many sports enthusiasts 
now demand more than a simple 
won/lost type of scoring. They want to 
know all types of statistics: batting 
average for the season, against left- 
handed pitchers, against a particular 
team; pass-completion percentages, 
yards-per-carry, total yardage; etc. TV 
and radio sportscasters provide some 
of this data, but a micro could permit a 
fan to call up the information which he 
is interested in— when he wants it! 



Averages and Handicapping: Any 

league secretary can tell you that keep- 
ing the bowling or golf averages and 
handicaps for a team or league can be 
a tedious job. How simple for the micro 
to keep all of the pertinent information 
updated and instantaneously deter- 
mine any required set of averages and 
handicaps. 

Scoring: Some sports have complex 
scoring requirements and could make 
good use of a micro. The scoring of 
Olympic ice skating or gymnastics re- 
quires certain scores to be dropped, 
others to be averaged, and other fac- 
tors to be weighted. Any event which 
has a large number of par- 
ticipants—such at the Boston 
Marathon— could obviously use a 
number of micros to help keep account 
of who is and who is not on the track. 

Summary: A microcomputer can 
have a number of roles in the sporting 
world. 



An OSI Cheep Print 



Here is the answer to the age-old question, "How do I 
get data from my computer to a remote printer?" Hard- 
ware requirements are discussed and software is provid- 
ed. 



Thomas R.Berger 

10670 Hollywood Blvd. 

Coon Rapids, MN 55433 



When I settled on an OSI com- 
puter, I knew that OSI's documenta- 
tion was not the best. The documen- 
tation that I received was far better 
than I had expected, but there were 
no disassembled listings of 
machine software. The dealer from 
whom I purchased the computer 
was very helpful, but even that is no 
substitute for hard copy listings. 
OSI's OS65D operating system con- 
tains a disassembler so that listing 
of a few program lines is possible. 
Even so, it is very difficult to under- 
stand a large program seeing only 
20 lines at a time. 

The program offered here solved 
my problem for almost no cost. It 
will run on Challenger 2, 4, and 8 
computers equipped with a disk and 
OS65D. (I have OS65D V3.2 NMHZ 
10/79 POLLED.) The machine 
language program will run on any 
OSI computer with the keyboard 
tone generator. However, the BASIC 
program in Listing 2 will only con- 
nect the routine to OS65D. Changes 
are needed if you have a non-disk 
system. The program has been so 
valuable that using it I have written 
a BASIC text processor whose out- 
put I run on an IBM selectric for 
beautiful right and left justified 
copy. 

About the time I received my com- 
puter, a friend, C.A. McCarthy, told 
me of a program he had developed 
to use on his PET to send tones to a 
tape recorder. These tones were 
subsequently played back to a 
printer with attached modem to pro- 
duce hard copy. I was new to 
machine programming, so he kindly 
sketched the crux of such a program 



for me. After disassembling the 
operating system and experimen- 
ting with possible ways to use the 
program, the present version 
evolved. 

Recently, Charlie gave me a copy 
of his article 'Cheep Print' which ap- 
pears in Compute No. 3. Even 
though it is written for the PET, 
rather than a Challenger, this article 
contains valuable information. I will 
only repeat the more vital data given 
in that article. 

The Equipment 

To use this program you need: (1) 
a cassette tape recorder; (2) a 
kludge to decrease the volume from 
the computer output to the recorder; 
(3) HIFI phonograph cables to con- 
nect things together; (4) a telephone 
handset; and (5) someone else's 
printer with a modem attached. (You 
can live without items (2), (3), and (4) 
if you are a pauper and warbling 
tones are music to your ears.) Let's 
run over these items one at a time. 

Almost any cassette recorder will 
do. I am probably unique among 
computerists in owning a cassette 
recorder which is unsuitable for 
computer use. This machine is an 
older Panasonic. For reasons 
known only to themselves the 
designers geared the capstan drive 
to the capstan roller. Gear enhanced 
warble does wonders toward 
destroying the enjoyablility of music 
and the intelligibility of computer 
tones. Panasonic must have fired 
those engineers since newer 
models do not have this ingenious 
innovation. I borrowed Charlie's 



'Brand X El Cheapo' cassette 
machine and have since bought a 
small GE recorder. The printers 
can't seem to tell the difference bet- 
ween these two because they both 
work fine. 



The schematic for my kludge is 
given in Figure 1. The potentiometer 
is nothing special. Anything from 
10K ohms on up will do. I have used 
both 10K and 1 Megohm pots. The 
10K choice is slightly easier to ad- 
just. The resistor can have values 
from 4.7K to 47K and still work; be 
creative. My kludge is housed in a 
1.5x1.5x2.25 inch metal box. A 
plastic box or pill bottle should work 
fine. This kludge is a real handy dan- 
dy. When I travel, I often take a 
recorder with me. It is easy, using 
the kludge, to dub tapes from the 
radio, a HIFI, or another recorder. 
OSI protects the tone output with 
blocking capacitors. However, if you 
record music such protection may 
not be present. If you find the kludge 
not working, the reason may be due 
to voltages appearing at the input of 
your recorder. Inserting the optional 
capacitor should cure all problems. I 
have never used such a capacitor 
and have had no problems. Adjust- 
ment of the kludge is always the 
same: record music or tones while 
fiddling the pot on the kludge; set 
the pot at a level slightly below the 
point where the recording begins to 
sound awful. That's all there is to it. 

The cables are the ordinary kind 
available at HIFI, electronic, and 
radio shops. You need ones to fit the 
holes on your recorder, your com- 
puter, and the kludge. 
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Letterbox 



We often get letters, such as the following, which ask for ad- 
vice. They are frequently long, and for lack of time, we cannot 
answer then individually, point by point. Furthermore, we are 
publishers, not consultants, and dare not recommend specific 
products, despite our personal experience and preferences. 

We know, however, that some of our readers could and 
might like to answer other readers' queries. Therefore, as 
space permits, we will print such letters here. 
NOTE TO THOSE SEEKING ADVICE: To increase your chances 
of having your letter published — please be brief! The following 
letter had to be shortened considerably: 

Dear Editor: 

I am planning to purchase an Apple II but am running into a 
problem in planning the system I will get. Most computer 
stores tend to push the brands of hardware they carry. Thus, I 
don't think I'm getting objective information. In particular, I am 
vexed by the choice of which printer to get. Money is a big fac- 
tor, but also of prime interest to me are two uses to which I 
plan to put the computer: I want to use it in text editing and 
also to aid me in musical composition with the appropriate 
hardware/software. 

Should I get one printer that does both letter-quality work 
and the necessary graphics for musical scores, or would I be 
better off buying two printers, one letter-quality and one with 
graphics ability? (one dealer suggested the Centronics 737 as 
being of letter quality; do you believe this print is acceptable?) 
Second, in line with your answer to my first question, could 
you recommend a printer or printers that fit my specifications? 

David Ben Leavitt 

8044 Germantown Avenue 

Philadelphia, PA 19118 



Dear Editor: 

I enjoyed reading the article on "BCD Input to a 6502 
Microprocessor", (August 1980 27:68-70) since I recently went 
through the same problem with an AIM-65. The subroutine 
which unpacks a pair of BCD digits (lines 500-570 of the pro- 
gram) is unnecessarily complex. If you think hard about the 
problem, or do as I did, just enumerate all the cases and look 
for the pattern, you willf j nc j that the conversion basically in- 
volves longhand division of the input by 16. If the two digit in- 
put is XY the quotient is the left hand digit(X) and the re- 
mainder is the right hand digit(Y). The BASIC programs listed 
below will do the conversion. The last line repacks in base 10. 

I 10 XY = PEEK (40960) 
20 l = XY/16 

30X = INT(I) 

40Y = (I-X)*16 

50XY = (10*X) + INT(Y) 

II 10 XY = PEEK(40960) 
20X = 

30 Y = XY 

40 IF Y < 16 THEN 80 
50 X = X + 1 
60 Y = Y-16 
70 GOTO 40 
80XY = (10*X) + Y 
Program I is cuter, but program II is probably faster. The 
roundoff problems discussed in the article preceding the one 
being discussed don't apply since 16 represents exactly in 
binary. (I tried all 100 cases on an AIM-65.) It is not clear to me 
what the fastest way to do the job is if you work in assembler 
or machine code. Are there any readers out there who would 
care to explain the fastest way for us? 

Richard Garber 

3535 Greenbrier Blvd., Apt. 34A 

Ann Arbor, Ml 48106 



OSI SOFTWARE FOR OSI OSI 

We Have Over 100 High Quality Programs For Ohio Scientific Systems 
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ADVENTURES AND GAMES 

Adveniures - These interactive fantasies will fit 
in 8K! You give your computer plain english 
commands as you try to survive. 

ESCAPE FROM MARS 

You awaken in a spaceship on Mars. You're in 
trouble but exploring the nearby Martian city 
may save you. 

DEATHSHIP 

This is a cruise you won't forget - if you survive itl 

Adventures $14.95 Tape or 5'A" Disk 
$15.95 8" Disk 

STARFIGHTER $5.95 

Realtime space war with realistic weapons and a 
working instrument panel. 

ALIEN INVADER 6.95 (7.95 for color and sound) 

Rows of marching munching monsters march on 
earth. 

TIME TREK $9.95 

A real time Startrek with good graphics. 

BATTLEPAC $17.95 

For the battlebuff Contains Seawolfe. Starfighter. 

Bomber and Battlefleet. 



And lots, lots, lots morel 




TEXT EDITORS FOR ALL SYSTEMS!! 

These programs allow the editing of basic 
program lines. All allow for insertion, deletion, 
and correction in the middle of already entered 
lines. No more retyping. 

C1P CURSOR CONTROL (Text Editor) $9.95 

Takes 166 bytes of RAM and adds, besides text 
editing, one key instant screen clear. 

C2P/C4P CURSOR $9.95 

Takes 366 BYTES to add PET like cursor 
functions. Enter or correct copy from any location 
on the screen. 

SUPERDISK $24.95 for 5" $26.95 for 8" 

Has a text editor for 65D plus a great new 
BEXEC*. a renumberer, search, a variable table 
maker and Diskvu - lots of utility for the money. 

We also have 25 data sheets available such as: 
IMPLEMENTING THE SECRET SOUND PORT ON 
THE C1P $4.00 

HOW TO DO HIGH SPEED GRAPHICS IN BASIC 

$4.00 

HOW TO READ A LINE OF MICROSOFT $1.00 

JOYSTICK INSTRUCTIONS AND PLANS FOR 

C1P$3.0O 

SAVING DATA ON TAPE $4.00 



THE AARDVARK JOURNAL 



A tutorial bimonthly journal of how to articles 
$9.00 

Our $1 .00 catalog contains a free program listing, programming hints, lists of PEEK and POKE locations and other stuff that OSI 
forgot to mention and lots more programs like Modem Orivers, Terminal Programs, and Business Stuff. 

Aardvark Technical Services 1 690 Bolton, Walled Lake, Ml 48088 (313) 669-3110 
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The telephone handset is a conve- 
nience: it fits into the modem cradle 
and should have a jack on the other 
end to plug into your recorder out- 
put. A very small transistor radio 
speaker could probably substitute 
for the handset. You can buy an ex- 
pensive telephone at your local dis- 
count store and cut the handset off; 
you can haunt the radio junk shops; 
or you can touch-up a local radio 
amateur club for information. There 
seem to be telephoneless handsets 
floating around at reasonable 
prices. 

The kludge, wire, and handset are 
not essential. I did my first printing 
over the phone lines by holding the 
phone up to the speaker on my video 
TV monitor. Later I held the tape 
recorder microphone up to the TV to 
record, and the recorder itself up the 
the modem to play back. 

Finally, you need a printer with a 
modem attached. I use two at work. 
Students may be able to use 
printers at their schools. (Be sure 
your employer or school approves of 
this procedure.) A buddy may let you 
use his. If you are looking for a 
suitable buddy, join a computer 
club. After using this program you 
will covet a printer. If your local 
computer shop realizes this, they 
may let you use their printer for a 
small 'paper and use' fee. 

These gadgets are connected 
together as follows: the tones come 
out of the tone generator on your 
computer; this output is on the back 
panel of the C4P and on the back of 
the keyboard of the C8P. (See your 
instruction manual.) Use your wire 
to connect the tone generator to the 
kludge and then the kludge to the 
microphone input on you casette 
recorder. Now it's ready to go. The 
poor man's approach is to connect 
the tone generator to the video TV 
monitor and play it into the 
microphone on the cassette 
recorder. 

The Programs 

Now that we have the nuts and 
bolts under control let's move on to 
the programs. The assembly 
language program appears in 
Listing 1. The 0S65D operating 
system has an Assembler. In fact, 
this program was prepared on the 
Assembler. This is probably the 
quickest way to put CHEEP PRINT 



into your system. Those following 
this route probably need no further 
help. 

If you're not a programming ace, 
Listing 2 gives a BASIC program 
that will: (1) load CHEEP PRINT; (2) 
ask you for and set all parameters; 
and (3) start the program running. 
The various tone mode data are 
listed in Table 1. A baud rate of 110 
is reliable but slow; 300 is more ac- 
ceptable, but the printer you use 
may give you no choice about baud 
rates. The ANSWER or ORIGINATE 
modes may also be fixed by the 
modem. The OSI tone generator is 
more 'fine-tuned' for low tones, and I 
have had the best luck with these 
frequencies, even though my first 
several hundred pages were suc- 
cessfully run with the high tones. 
You may also prepare Kansas City 
Standard tapes with this program. 
The necessary data are given with 
the modem data. 

Those of you who have ROM 
BASIC without 0S65D are left pretty 
much on your own, since the BASIC 
program given here assumes you 
have a disk drive and 0S65D. If and 
when I obtain full information on 
how to connect the routine on non- 
disk systems, I will publish it. So- 
meone with such a system could 
solve the problem by writing the 
solution down and sending it to his 
favorite computer magazine. The 
secret is to change the pointers to 



the printer subroutine so that they 
point to CHEEP PRINT instead. 
With ROM BASIC this may be quite 
a trick. 

Using It 

Finally, we need to know how to 
use the program. Once the program 
is loaded, the computer thinks 
CHEEP PRINT is a printer. Thus all 
commands or statements which 
would cause a printer to print (if you 
had one) will cause CHEEP PRINT 
to chirp instead. In a BASIC pro- 
gram, 

10 PRINT "GARBAGE" 

will cause the word "GARBAGE" to 
appear on the screen. In the same 
way, 

10 PRINT #4, "GARBAGE" 

will send the word "GARBAGE" 
warbling out your tone generator. 
Similarly LIST #4 would list a pro- 
gram via tones. When you use the 
device #4 statements, you will see 
nothing on the screen; it's all going 
out the tone generator. Don't lose 
heart in this case because your 
computer really is working. You may 
also reset the input/output flags via 
the operating system 10 command. 
The command (from BASIC) 
DISK"I0, 0A will cause all output to 
go both to the screen and out the 
tone generator. DISK!"I0, 02" will 



Figure 1 
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reset the 10 to screen only. Beware 
that the operating system objects to 
your changing the output flag so 
that for certain changes in 
operating mode (such as disk errors 
or a CONTROL C) it will reset the 
flag to screen only. If you reset the 
computer, you will have to reload 
CHEEP PRINT. 

The loading program will ask for a 
carriage return time. This must be 
determined experimentally. I use a 
wait time of 20 for an NCR thermal 
printer which has a fast carriage 
return. The IBM selectric is so slow 
that I not only use full wait time of 
255, but also add extra stop bit time 
equal to 40 after each character. In 
my word processor program I use a 
BASIC wait loop for carriage 
returns. The stop bits in the table 
are minimum. They provide wait 
time after each character and may 
be increased to any number greater 
than the minimum. 

All parameters are set in the 
beginning of the BASIC loading pro- 
gram in Listing 2. The equations for 
calculating these, parameters are 
given in the Appendix. There is a 
great deal of flexibility in the recor- 
ding formats that you can choose. 

The Bottom Line 

Now comes the fine print. The OSI 
tone generator is not perfect and 
neither is cassette tape. When many 
appliances are switching off and on, 
they may upset your tape recorder 
and cause a slight pop to be record- 
ed on the tape. The keyboard cables 
which came with my C8PDF were 
quite short, so I added longer 
cables. This caused havoc with the 
tone generator. I still have not fully 
cured the problem. The computer's 
pops and clicks are coupled through 
the long cable to the tone generator 
causing it to pop and click. In- 
terestingly enough, these pops are 
most severe in the left margin of 
CHEEP PRINT output. When I find a 
sure cure, I will let people know. 
Modems don't like these pops and 
say so by causing the printer to 
botch a letter or two. If you run 
repeated hard copy and find the 
same errors in the same places, 
then the problem is with the 
cassette recording. Listen carefully 
to the recording and see if you can 
hear the errors. One solution is to 
spend more money for filters. My 
solution is to record when the ap- 
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;nri nirrP print 


20 






;T.R. 


RrRr.rit 


3/8" 


30 












to 






;ASSErBlY DATA 




50 

60 5000 




' 


> ■ $50"n 


; START ADDRESS 


70 0092- 






SH ■ *97 




;I>n.AY SHORT 


80 0003- 




LO - $03 




;PFLAY I0MG 


90 00014- 




SP ■ SOI. 




;ST0P HIT TIME 


100 OOIU" 




WT ■ Sll. 




,-CARRIAOE RETURN WAIT 


110 002E- 




LO • $2E 




;L0W TONE ni VISOR 


120 0027- 






HI • $27 




;III0II TONE PI VISOR 


150 




j 








M0 






;THIS 


IS THE 


MAI N PROGRAM 


150 




• 








160 5000 


lift 




PHA 




;SAVE CHAR ON STACK 


170 5001 


78 




SEI 




; INHIBIT INTERRUPTS 


180 5002 


A22E 




IPX "in 




;SET 10 TOME DIVISOR 


190 5001. 


8E01PF 




STX SDF01 




;Tl'RN TONE ON 


200 5007 


202E50 




JSP. DEMY 




;WAIT ONE BIT 


21.0 5 00A 


38 




SEC 




;SCT UP A STOP BIT 


220 500B 


6A 




ROR A 




;GET FIRST BIT 


230 500C 


A22E 


I oopi 


LOX »LO 




;LO TONE DIVISOR 


2"t0 500E 


9002 




8CC RR 




;GET HIGH TONE IF 1 


250 5010 


A227 




IPX (Ml 




;lll TONE DIVISOR 


260 5012 


8E01PF 


BR 


STX $nF01 




;THRN ON TONE 


270 5015 


202E50 




JSP. PELAY 




;WAIT ONE HIT 


280 5018 


llA 




LSR A 




;GET NEXT BIT 


290 5019 


D0F1 




BNE LOOPl 




; IF MORF RITS THEN 


300 5018 


B0EF 




ncs ioopi 




;GO RACK * SEND THEM 


310 501D 


A20I. 




inx «sp 




;STOP RIT TIME 


320 501F 


203250 




JSP. IOOP2 




;SF.'IP STOP BITS 


330 5022 


68 




PIA 




;GET CHARACTER 


31.0 5023 


C9on 




c.vr #son 




; CARRIAGE RETURN? 


350 5025 


D005 




bnt done 




;N0, THEN DONE 


360 5027 


A2U 


HAITI 


LPX »WT 




;YES, THEN WAIT 


370 5029 


205250 




JSP. L0OP2 






380 502C 


58 


DONE 


CLI 




; INTERRUPTS OK NOW 


390 5020 


60 




RTS 




;0UIT 


UOO 












mo 






;THIS 


IS THE 


DEIAY 


li20 




; 








1.50 502E 


A205 


DELAY 


LPX UG 




;L0NG DELAY TERM 


1.1.0 5030 


A092 




LPY »SH 




;SH0RT DELAY TERM 


1.50 5032 


88 


LOOP? 


PEY 




; COUNT DOWN Y 


1.60 5033 


P0FD 




BNE LO0P2 




; COUNT Y TO 


1.70 5035 


CA 




OEX 




; COUNT DOWN X 


1.80 5036 


D0FA 




BNE L00P2 




; COUNT X TO 1 


1.90 5038 


60 




RTS 




;GO BACK 


500 




.ENP 









pliances are quiet, plug the recorder 
into a separate outlet, and keep it 
away from the computer. I also 
tolerate an occasional error. Before 
I lengthened the keyboard cables, I 
obtained almost perfect copy. The 
few errors I did have could be heard 
as tape dropout and minor clicks. 
This article was prepared using the 
word processor and CHEEP PRINT. I 
am happy with CHEEP PRINT (even 
though I wish I had my own printer). 

If you find many nonrepeating er- 
rors then your tone generator and 
the modem have a disagreement. 
You own your tone generator so you 
change its personality to make it 
more agreeable. Since not all 
modems are created equal, you may 
have different changes for different 
modems. Listing 3 gives a BASIC 
program which will allow you to 'fine 
tune' your tone generator for a par- 
ticular modem. Run this program 
and record the output via CHEEP 
PRINT. Look over the printed output 
for the 'best values ' of HI and LO. 
Insert these values in the loading 
program of Listing 2 for L1, H1, L2, 
etc. You will probably find that the 
calculated values are best. 



Listing 1 

But Mom, It doesn't work 

I am annoyed when I enter a pro- 
gram exactly as written and it 
doesn't work as it's supposed to. I 
can't promise you this one will work, 
but if it doesn't, the following hints 
may help. 

There are several levels of 'NOT 
WORKING.' They are: (1) nothing 
happens; (2) the system crashes 
when the program is loaded; (3) the 
system crashes when you try to out- 
put via CHEEP PRINT; (4) the tone 
comes on but it doesn't warble; and 
(5) you get nice warbling tones but 
they look like mish-mash on the 
printer. The cures are as follows. 
First, check (character by character) 
the BASIC loading program in 
Listing 2. An error in a DATA state- 
ment or a POKE will stop the pro- 
gram from running properly. Next 
get your manual and compare the 
addresses given there with the ones 
listed at the end of the APPENDIX. If 
they don't match, use the ones from 
your manual. There is one crucial 
address you will not find: the one for 
the beginning of the printer 
subroutine in the 0S65D input/out- 
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put table. It should be where I say it 
is, but if it isn't, hop off to your local 
OSI dealer and ask him, "Where is 
the OS65D I/O jump table located in 
my memory map? In this table, 
where is the printer subroutine ad- 
dress?" You don't want the address 
of the printer subroutine. You do 
want the two addresses of the two 
locations in the jump table which 
store the address of the printer 
subroutine. (Isn't that confusing?) 
These two addresses, converted to 
decimal, appear as the addresses in 
the POKEs in line 670 of Listing 2. 
If you've managed to wade this 
far, you should be able to play 
CHEEP PRINT through your video 
monitor and hear warbling tones. 
Now, about that mish-mash: 
Carefully read your manual on your 
tone generator. Does everything 
check with the APPENDIX data? If 
not, use the values from your 
manual. 



My computer has a 1MHZ clock 
frequency. All of these programs 
assume this is the clock speed. If 
you have a newer C4P or C8P (or the 
GT option) then you have a different 
clock frequency. Look in your 
manual or phone your local OSI 
dealer to find out your clock fre- 
quency. The APPENDIX explains 
how to incorporate changes into the 
program for a different clock speed. 

If the program still does not work, 
I can offer only the following 
general observations. If you run the 
program of Listing 2 and it causes 
your system to crash then the ad- 
dresses in Line 670 are wrong, or the 
address in Line 540 is wrong. That 
is, the BASIC program can't find the 
printer jump table or it can't find a 
proper home for CHEEP PRINT. If 
the system crashes when you at- 
tempt to run CHEEP PRINT, then the 
program is not properly protected 



from BASIC (Lines 530-640) or the 
program can't find the printer jump 
table. If you hear a tone but no 
warbling, then again the problem is 
with the jump table. If you hear 
warbling, but get mish-mash, then 
the trouble is with either the tone 
timing (variables: LG; SH; SP; and 
WT) or the tone frequencies 
(variables: LO and HI). If the timing 
is off, your system clock is not 
1MHZ. If the tone frequencies are 
off, you may be able to adjust them 
to the correct values by experimen- 
tation. The tone must sound clean 
and be clear of all clicks and pops. 

Good luck! You will find that a 
printer gives a whole new dimension 
to your computing. If you have ques- 
tions, I might be able to help. I'd be 
glad to reply if a question is accom- 
panied by a stamped self-addressed 
envelope. Write to: 

Tom Berger 

10670 Hollywood Blvd. 

Coon Rapids, MN. 55433 



STOP BITS 


STOP BITS( M S) 




2 


18182 




1 


3333 




SPACE(O) 


DIVISORS 


ERRORS(% 


1200HZ 


20 41 


2.4 0.1 


2025HZ 


22 24 


0.4 1.1 


1070 HZ 


39 46 


0.8 0.1 


given by: 






JENCY = 49152/DIVISOR. 





APPENDIX 

All variables are named at the beginning of the BASIC loader program in Listing 2. The various stan- 
dards are as follows: 

BAUD RATE BIT TIMERS) 

110 9091 

300 3333 

MODE MARK(1) 

KANSAS CITY 2400HZ 

ORIGINATE 2225HZ 

ANSWER 1270HZ 

The frequency of the tone generator is given by: 

FREQUENCY = 
Below, T1 is the time of 1 bit. Time through the character loop: 
T1 = 1284*LG + 5*SH - 1250 
LG = INT((T1 + 1250)/1284) 
SH = INT((T1+ 1250-1 284 *LG)/5) 

The stop bit time is only approximately computed. If T is the ful 

SP = INT((T+1917)/1284). 
If your clock speed is C MHZ then use INT(C*T1) and INT(C*T) in place of T1 and T in the above formulas. 
Calculated parameters (1MHZ clock): 

110 BAUD 300 BAUD 

LG 8 3 

SH 14 146 

SP 15 4 

Calculated parameters (2 MHZ clock): 

LG 15 6 

SH 34 43 

SP 30 7 



stop bit time then: 



Now the POKES of Listing 2 and their meanings: 

MEANING 
Address of the last memory page. 
BASIC end of memory. 
Low byte: Input/output jump table. 
High byte: Same as above. 
Tone generator ON/OFF. 
Tone generator frequency. 



POKE 


NUMBER 


8960 


ST 


132,133 


00,ST 


8983 


255 


8984 


ST-1 


56832 


3 


57089 


HI, LO 



510- 

510 
520 
530 

540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
7U0 
750 
760 
770 



;TIME THROUGH LOOP2 TO RTS 

;1284*LG + 5*SH - 1275 

= T (1 MHZ CLOCK) 

;TIME THROUGH CHAR 

;T + 25 (1 

BAUD 



DECODE 
MHZ CLOCK) 



;110 

;SH = $0E 
;LG = $0 8 
;SP = $0F 

;300 BAUD 

;SH = $92 
;LG = $03 
;SP = $01* 

;WAIT TIMES 

;MCR WT = 
; I BM WT = 
;IBM SP = 

; ANSWER MODE 

;L0 = $2E 
;HI = $27 

;ORIGIMATE MODE 
;LO = $18 
;HI = $16 

; KANSAS CITY 
;LO = 
;HI = 



11+ 

8 

15 

146 
3 



$14 ■ 
$FF = 
$28 ' 

= l|6 

= 39 

= 24 
= 22 



20 
255 

1+0 



STANDARD 
$29 = 1+1 
$11+ = 20 

;KC RUNS AT 
300 BAUD 



780 .END 



100 

110 

120 

130 

lt+0 

150 

160 

170 

180 

190 

200 

210 

220 

230 

21+0 

250 

260 

270 



REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 



Listing 2 

*** A BASIC LOADER FOR 
*** "OS I CHEEP PRINT" 
*** T. R. BERGER 3/80 
*** VARIABLE NAMES 
DIVISOR LO TONE; LO 
DIVISOR HI TONE; HI 
STOP BIT TIME ; SP 
CAR RETURN WAIT; WT 
OELAY LONG ; LG 
DELAY SHORT ; SI 1 
BAUD RATE ; BR 
BYTE OF DATA ; BY 
ADDR CHECK ; CH 
APPR DELAY HI ; DH 
ADDR DELAY LO ; DL 
APHR LOOP2 HI i LH 
APDR LOOP2 LO ; LL 
ADDR START ; ST 



280 

290 

300 

310 

320 

330 

31+0 

350 

360 

370 

380 

390 

1+00 

1+10 

1+20 

1+30 

i+'+0 

1+50 

1+60 

1+70 

1+80 

1+90 

500 

510 

520 

530 

51+0 

550 

OK 

560 
570 
580 
590 
600 
610 
620 
630 
61+0 
650 
6G0 
670 
630 
690 
700 
710 
720 
730 
71+0 
750 
760 
770 
730 
790 
800 



REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

Ll = 

REM 

L2 = 

REM 

H3 = 

REM 

Hl+ = 

REM 

H5 = 

REM 

ST = 

CH= 



110 
110 
110 
300 
300 
300 
KC 



BAUD 
BAUD 
BAUD 
BAUD 
BAUD 
BAUD 
TONE 



KC TONE 
ORG TONE 
ORG TONE 
ANS TONE 
ANS TONE 
MODE CHO 
STOP BIT 
*** FIXE 
110 BAUD 

8:Sl=li+:B 
300 BAUD 

3:S2 = li+6: 
KC MODE 

20:L3=41 
ORG MODE 

22:Li+=2i+ 
ANS MODE 

39:L5=46 
*** PROT 

PEEKC39B0 

(ST+1)*25 



LONG 

SHORT 

STOP 

LONG 

SHORT 

STOP 
HI 
LO 

HI 

LO 

HI 

LO 
ICE 

CHANGE 
D PARAME 



LI 
SI 
Bl 
L2 
S2 
B2 
H3 
L3 
Hit 
Lit 
H5 
L5 
MO$ 
SP$ 
TERS 



1 = 15 
B2 = 4 



ECT 

) 

6 



HI MEMORY 



REM IS PROGRAM LOADED? 

IF PEEK(CH)<>72 THEN 630 

IF PEEK(CH+1X>120 THEN 630 

IF PEEK(C!I + 2X>162 THEN 630 

ST=ST+1 

GOTO 670 

REM NO, THEN PROTECT 

POKE13 2 / 00:POKE133 / ST 

POKE8960,ST-1 

REM *** DOS JUMP TABLE 

REM PRI NTER SUBR ADDR 

P0KE8983,255:POKE898tK,ST-I 

REM *** START ADDRESS 

ST=ST*256 

REM *** CALC SUBR ADDR 

DH=INT((ST+46)/256) 

DL=(ST+i+6)-256*DH 

LH=INT((ST+50)/25 6) 

LL=(ST+50)-25R*LH 

REM *** MAI N PROGRAM 

REM ** QUESTIONS FIRST 

PRI NT "CHOOSE A MODE OF "; 

PRINT "OPERATION." 

PRINT "KANSAS CITY/ORIGINATE/"; 

PRINT "ANSWER (K/O/A)"; 
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810 

820 

830 

840 

350 

860 

870 

830 

890 

9 00 

910 

920 

930 

940 

950 

960 

970 

930 

990 

1000 

1010 

1020 

1030 

1040 

1050 

OK 

1060 
1070 
1030 
1090 
1100 
1110 
1120 
1130 
ll'iO 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1230 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 



INPUT MO$ 

IF MO$="K" THEN 8 50 

IF MO$="0" THEN 850 

IF M0$O"A" THEN 770 

PRINT "CHOOSE A BAUD RATE." 

INPUT "(110/300)"; BR 

IF RR=110 THE!- 1 890 

IF BRO3 00 THEN 85 

PRINT "CARRIAGE RETURN WAIT." 

INPUT "(<256)"; V/T 

IF WT<0 OR WT>255 THEN 890 

IF WTOUrr(WT) THEN 89 

PRINT "CHANGE STOP BIT TIME?" 

INPUT "(Y/N)"; SP$ 

IF SP$<>"Y"THEN 1020 

PRINT "NEW TIME?" 

INPUT "(<25G)"; SP 

IF SP<0 OR SP>255 THEN 930 

IF SPOI NT(SP) THEN 93n 

B1=SP: B2=SP 

REM ** LOAD CHEEP PRINT 

FOR I =0 TO 56 

READ BY 

POKE ST+I,BY 

NEXT I 



1370 
1330 
1390 

OK 



D<\TA 
DATA 
END 



136/208,253,202, 203 

259,96 



REM * 

IF BR 

LG = L2 

LG = L1 

REM * 

IF MO 

I F MO 

LO = L5 

L0 = L3 

LO = L4 

REM * 

POKE 

POKE 

POKE 

POKE 

POKE 

REM * 

POKE 

POKE 

POKE 

POKE 

REM * 

POKE 

REM * 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 



* BAUD RATE TIMINI 
=110 THEN 1090 
:S!l = S2:SP = R2:OOTO 
:SH=S1:SP=B1 

* TONE Dl VI SORS 
$="K" THEN 114^ 
$="0" THEN 1150 

HI =H5:GOTO 1170 
HI=H3:COTO 1170 
HI =114 



1110 



PARAMETERS 
POKE ST+13 



* INSERT 
ST + 3, LO: 
ST+17/HI 

ST+40,WT 
ST+30,SP 
ST+47,LG:POKE ST+49 

* SUBROUTINE ADDRS. 
ST+8,DL: POKE ST+9, 
ST+22,DL:POKE ST+23 
ST+32,LL:POKE 
ST+42,LL:POKE 

* TURN ON TONE 
56332,3: POKE 57039 
** MACHINE PROGRAM 
72,120,162,0,142,1, 
32,0,0,56,106,162,0 
144,2, 162,0,142,1,2 
32,0,0,74,203,241,1 
239,162,0,32,0,0,10 
201,1.3,293,5,162,0, 
0,0,38,96,162,9,160 



ST+33 
ST+43 



, LO 



,SII 

DU 
,DH 
, LH 
,LH 

,HI 

223 

23 

76 

4 

32 

,0 



100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
279 
230 
290 
300 
310 
320 
330 
3i|0 
350 
360 
370 
380 
390 
400 
410 
4 20 
4 39 
440 
45 
460 
470 
430 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 



Listing 3 

REM *** TESTER FO 
REM; *** "OS I CHEE 
REM *** T.R. BERG 
REM ** GET START 
ST=PEEK(3960) 
ST=(ST+1)*256 
REM ** DETERMINE 
INPUT "MODE (K/O/ 
I F MO$="K" THEN 2 
I F MO$="A" THEN 2 
IF MO$="0" THEM 2 
GOTO 170 

LO=41:HI =20:GOTO 
LO = 46:lll=39:GOTO 
LO=24:HI =22 
REM ** SET I/O 
DISK!"IO ,9A" 
REM ** PRINT LOOP 
REM VARY LO 
FOR I =LO-2 TO LO + 
POKE ST+3, I : POKE 
REM- VARY ill 
FOR J=HI-2 TO HI+ 
REM KEEP HI ABOVE 
IF K=J THEN 510 
POKE 57039, J 
POKE ST+17,J 
REM LET NEW TONE 
FOR K=0 TO 1000 
NEXT K 

REM OUTPUT TWICE 
FOR K=0 TO 1 
PRINT "ABCDEFGHIJ 
"TUVWXYZ 01 
"!#$^&'() = 
" : ? " 

"THIS IS A 
"HI=";J;"LO 
: PRINT 



R 

P PRINT" 

ER 3/80 

ADDR 



MODE 

A)"; MO$ 

20 

30 

40 

260 

260 



ST+13, I 



LO 



GO 



KLMNOPORS"; 
23456789" 
<>+-*/ ."; 



TEST." 






PR I NT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

NEXT K 

NEXT J 

NEXT I 

PRINT "TEST COMPLETE." 

REM ** RESET I/O 

DISK! "10 ,02" 

REM RESET TONES 

POKE ST+3,LO: POKE ST+13, LO 

POKE ST+17,HI 

END 



$$WIN$$ 

Sirius Software announces 
TWO CONTESTS 




1. STAR CRUISER 

Does something unusual when you score over 9999. Be the 
first to describe what happens and win $100 cash. Earliest 
postmarked correct entry wins. Send your entry with the 
face sheet from the package or other proof of purchase to 
Sirius Software. 




2. E-Z DRAW 

We're looking for the most creative use of E-Z Draw. 
Judging will be done by members of the Apple Sac Club 
based on originality, artistic merit, and practicality. First 
prize will be $100 cash and ten runners up will each receive 
their choice of either E-Z Draw, Starcruiser or both barrels. 



Entries lor both contests must be postmarked before 1 2/31 /80. Star Cruiser entries need only send proof ol purchase with a written description ol what happened when they scored 
over 9999 E-Z Draw entries must be submitted on apple compatible diskette. Entries must Include name.address & phone number. Diskettes will be returned to the contestants but we 
cannot guarantee sale return and we will not assume responsibility beyone the cost ol a blank diskette lor any work submitted. Winners ol the contests will be contacted directly and the 
names of all winners will be announced In advertisements In this magazine alter January 1, 1981. Contest void where prohibited by law. Employees or family of Sirius Software or their 
distributors are excluded from participation. 

E-Z DRAW and DUCK HUNT include character generation by Ron and Darrel Aldrich 

SIRIUS SOFTWARE is proud to announce that SYNERGISTIC SOFTWARE 

is now a distributor for these products. Contact your local dealer 

or call SYNERGISTIC SOFTWARE at (206) 641-1917. 



SIRIUS SOFTWARE 

1537 Howe Avenue #106 
Sacramento, CA 95825 
(916) 920-8981 



SYNERGISTIC SOFTWARE 

5221 120th Ave. S.E. 

Bellevue, WA 98006 

(206) 641-1917 



PRINT USING for Applesoft 



One of the minor but annoying problems with BASIC is 
the format of output. The program here permits user- 
defined formatting of the output for Applesoft, and can 
be easily modified for other flavors of BASIC. 



Gary A. Morris 

53 Fairfield Ave. 

Norwalk, CT 06854 



When I started using my APPLE 
for business programming, my big- 
gest headache was formatting out- 
put for reports. I started out using 
various BASIC subroutines that 
barely performed the needed job 
and required a lot of overhead. Tired 
of using MID$, LEFTS, RIGHTS, and 
STRS, I decided to write a general- 
purpose print formatter using the 
USR function in Applesoft. 

The routine is written entirely in 
assembly language, which is ideal 
for handling this sort of problem. It 
is used from BASIC by assigning 
the string variable EDS, the edit pat- 
tern showing how you want the out- 
put formatted. During a print state- 
ment when you use the USR func- 
tion, the argument is evaluated and 
then printed in the format specified 
by the current value of EDS. 

In the sample BASIC program (in 
figure 1) line 10 loads the machine 
language program into RAM at 
S300-S3A9. Then line 20 puts a "JMP 
$0300" at S000A, which is used by 
Applesoft to find the routine to be 
used. Lines 10 and 20 are only need- 
ed once at the beginning of a pro- 
gram. Line 30 assigns an edit pat- 
tern to the variable EDS. Line 40 is a 
sample print statement that uses 
the USR function. Line 50 assigns a 
value to X (that we want printed) 
rounded off to two decimal places, 
and line 60 does this. If you wanted 
to round to three places, the 100 
would be changed to 1000 and the 
edit pattern would have to be chang- 



ed to allow three digits after the 
decimal point. Note that any valid 
expression could be within the 
parenthesis of the USR function. 

The routine works by taking the 
number that Applesoft would nor- 
mally print out and filling up the edit 
pattern with those characters from 
right to left, skipping over decimal 
points, commas and special 
characters. 

The output of the routine may be 
used wherever a BASIC PRINT state- 
ment can be used, such as printing 
to a disk file, to a printer, or just to 
the screen. It is especially desirable 
for creating fixed-length records in 
files. 

The edit pattern can be fairly com- 
plex, as in figure 1, or it can be simp- 
ly blanks. Using a blank pattern will 
cause the number to be right- 
justified within the number of 
blanks in the edit pattern. If the 
number is too large to fit in the edit 
pattern, the left-most digits will be 
truncated. Any special characters 
($ ,."-=- %:*) in the edit pattern will 
be skipped, and the digits will fill in 
over blanks or numeric digits in the 
pattern. 

The zeros are used in the edit pat- 
tern so that, if the number is small, 
there will always be zeros between 
the decimal point and the right-most 
column. If the number is too small to 
fill past the comma(s), then the ex- 
tra commas will be replaced with 



blanks. When using an edit pattern 
with a decimal point, the argument 
for the function must be a whole 
number, or two decimal points will 
result. The edit pattern must be less 
than or equal to 16 characters in 
length. If it is greater, it will be cut 
off at 16. 

The machine language program 
was written so that it can be located 
anywhere in addressable memory 
space. It is completely relocatable. 
That is, no changes are needed to 
run it at another address. It requires 
169 (SA9) bytes of RAM. The pro- 
gram uses the same zero page loca- 
tions that are assigned to Applesoft 
so that there are no conflicts. It also 
uses 752-767 (S2F0-S2FF) as a buffer 
to perform editing. This area is in 
the input buffer and is not used dur- 
ing printing (except when printin 
DOS commands). 

How It Works 

For those of you who would like to 
know how the program works, keep 
reading. Starting with the PRINT 
statement, the argument for the 
USR is evaluated and placed in the 
floating point accumulator by the 
BASIC interpreter. Then a JSR is 
made to S000A, where we have a 
JMP to the start of our subroutine. 

At the beginning of the machine 
language subroutine, the Applesoft 
floating point accumulator is con- 
verted (lines 48-55) into a character 
string, in the format that Applesoft 
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would normally print it out. This is 
done by the Applesoft subroutines 
FPSTR1 and FPSTR2 (my names). 
These routines leave the resulting 
string at the bottom of the page us- 
ed for the stack ($100). 

The routine then searches (lines 
57-75) the variable table to find EDS. 
When found, its value is moved 
(lines 77-83) to the buffer area 
($2F0-$2FF). 

After the program has all the 
necessary data, it starts to work. 
The length of the unformatted 
number is found (lines 85-90); and 
this number (an ASCII string right 
now) is then moved (lines 92-133) in- 
to the buffer, one character at a 
time, from right to left. The current 
character in the pattern is checked 
and, if it is a special character, it is 
skipped. Minus signs are carried 
over any digits in the pattern so that 
they will be on the left of the 
number. This process continues un- 
til we run out of characters to put in 
the pattern (or the pattern fills up), 
at which time any leftover commas 
are covered up (lines 135-145) with 
blanks. 

Finally the program is ready to 
print out the result. Lines 147-152 
print out all of the number, except 
the last digit (I'll explain this in a 
moment), using the output routine in 
Applesoft. This output routine does 
all of the necessary checking and 
conversion so that Applesoft's 
SPEED, INVERSE, and FLASH func- 
tions will work. The routine also sets 
the most significant bit of all outgo- 
ing ASCII characters. 

The USR function must return a 
value to the BASIC program, which 
will be printed out by the BASIC in- 
terpreter, because we are in a PRINT 
statement. The last character of the 
buffer (which must be a digit) is 
taken and converted to an integer 
in the Y register and passed to Ap- 
plesoft's integer to floating conver- 
sion routine (lines 154-161). This 
routine converts the integer (passed 
in the A,Y registers) into floating 
point in the floating point ac- 
cumulator, which is just where we 
need it to pass back to BASIC. 

Hardware Requirements 

This program requires an APPLE 
II + , and APPLE II with an Applesoft 



card, or and APPLE II with a 
language card. It will work in any 
memory size system. A disk drive is 
not required. 

If the appropriate changes are 
made to the JSR's and JMP in the 



machine language routine, the pro- 
gram can be used with RAM Ap- 
plesoft (which loads in at 
$0800-2FFF). After keying in the 
code from figure 2, if you then key in 
the code from figure 3, it will run 
with RAM Applesoft instead. 



Figure 1: Sample Program 



] LIST 



10 PRINT CHR$(4) ;"BLOAD EDIT. OBJECT 

CODE,A$300" 
20 POKE 10,76:POKE 11,0:POKE 12,3 
30 ED$="$ , 0.00" 

40 PRINT "SUB TOTAL. . . " ; USR ( 3495) 
50 X=12345. 67899 
60 PRINT "NET TOTAL..."; 

USR(INTfX*100+.5) ) 
70 END 

] RUN 

SUB TOTAL. . .$ 34.95 
NET TOTAL. . .$12, 345.68 



] 



Figure 2: HEX DUMP 
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Skylcs Electric Works 



Presenting the Skyles MacroTeA 



Text Editor 



Fast . . . Fast Assembler Enhanced Monitor 



To help you write your program, MacroTeA includes a 
powerful texi editor with 34 command functions: 
AUTO Numbers lines automatically 
NUMBER Automatically renumber* lines 
FORMAT Outouts text Me in easy to-read columns 
COPY Copies a line or group o' lines to a new 

location. 
MOVE Moves a line or group ol lines to a new 
location 

DELETE Deletes a line or group ol lines 
CLEAR Clears the text file 



PRINT Prints a fine or group ol lines to 
the PET screen 

PUT Saves a line or group o' lines Ol text on 
the tape lor disc) 

GET Loads a previously saved line or group ol lines 
o' text 'rom the tape lor disc). 
DUPLICATE Copies text file modules from one tape 
recorder to the other Stops on specific 
modules to ai'ow changes oeiore it is dupli- 
cated This command makes an unlimited 
lengtn program (text file I practical 

HARD Prints out text hie on printer 

ASSEMBLE Assembles text file with or without a listing. 

Assembly may be specilied lor the object code 
(program) to be recorded 01 placed in RAM 
memory 

PASS Does second pass ol assembly. Another 

command that makes unlimited length text 
files (source code) practical 

RUN Runs (executes) a previously assembled 
program 

SYMBOLS Prints out the symbol table (label lile) 

SET Gives complete control ol the si*e and location 
ol the text tile (source hie), label tile (symbol 
tabiel and relocatable buffer 

DISK Gives compteie access to the eleven DOS 
commands; 

PUT GET NEW INITIALIZE 
DIRECTORY COPY DUPLICATE 
SCRATCH VALIDATE RENAME 
ERROR REPORT 

EDIT Oilers unbelievably powerful search and replace 
capability Many large computer assemblers 
lack this sophistication. 

FIND Searches text file for defined strings. Optionally 
prints them and counts them; i.e.. this command 
counts number of characters in text file 

MANUSCRIPT Eliminates line numbers on PRINT and HARD 
command Makes Macro Tea a true and power- 
ful Text Editor 

BREAK Breaks to the Monitor portion of MacroTea 
A return to Text Editor without loss of text 
is possible. 

USER Improves or tailors MacroTea's Text Editor 
to user's needs; "Do-it-yourself" command 



Briefly, the pseudo-ops are: 

• BA Commands the assembler to begin placing assembled 

code where indicated 

• CE Commands the assembler to continue assembly unless 

certain senous errors occur. AH errors are printed out. 

• LS Commands the assembler to start listing source (text 

file! from this point on. 

• LC Commands the assembler to stop list source (text file) 

Irom this point m the program 

• CT Commands the assembler to continue that source 

program (text file) on tape. 

• OS Commands the assembler to store the object code m 

memory 

• OC Commands the assembler to not store object code in 

memory. 

• MC Commands the assembler to store object code at loca- 

tion different from the location in which it is assembling 
object code. 

• SE Commands the assembler to store an external address 

• OS Commands the assembler to set aside a block of storage 

• 8Y Commands the assembler to store data. 

• SI Commands the assembler to store an internal address. 

• DE Commands the assembler to calculate an external label 

expression. 

Dl Commands the assembler to calculate an internal label 
expression 

EN Informs the assembler that this is the end of the 
program. 

EJ Commands the assembler to eject to top of page on 

printer copy. 
SET A directive not a pseudo-op, directs the assemblers to 
redeline the value of a label 



Macro Assembler 

The macro pseudo-ops include: 

MD This is 3 macro beginning instruction delimi 

ME This is end Ol a macro instruction definition 

EC Do not output macro -generated code in sow 

listing. 
•S Do output macro- generated code in source 



Conditional Assembler 

The conditional assembly pseudo-ops are: 



IEO 
INE 
IPL 

IMI 



if the label expression is equal to zero. 

assemble this block ol source code (text file). 

If the label expression is not equal to zero. 

assemble this block of source code (text file). 

If the label expression is positive, assemble this 

block ol source code. 

II the label expression is negative, assemble 

this block of source code. 

This is the end ol a block of source code. 



. . . By having 16 powerful commands: 

A Automatic MacroTeA cold start Irom Monitor 

Z Automatic MacroTeA warm start from Monitor. 

F Loads from tape object code program. 

S Saves to tape object code between locations 

specilied. 
D Disassembles object code beck to source listing. 

M Displays in memory object code starting at selected 

location. The normal PET screen edit may be used 

to change the object code. 
R Displays in register. Contents may be changed using 

PET screen edit capabilities. 
H Hunts memory for a particular group ol object 

codes, 
rt Allows you to walk through the program one step 

at a time. 
8 Breakpoint to occur alter specified number ol 

passes past specilied address. 
Q Start on specilied address. Quit if STOP key or 

breakpoint occurs. 

T Translers a program Or part ol a program Irom one 

memory area to another. 
G Go 1 1 Runs machine language program starting at 

selected location. 
X Exits back to BASIC 

I Display memory Bnd decoded ASCII characters. 

P Pack (fill) memory with specilied byte. 

what are the other 
unique features of the 
MacroTeA? 

• Labels up to 10 characters in length 

• 50 different symbols to choose from for each character 

• 10 16 different labels possible 

• Create executable object code in memory or 
store on tape 

• Text editor may be used for composing letters, 
manuscripts, etc. 

• Text may be loaded and stored from tape or disc 

• Powerful two-cassette duplicator function 

• String search capability 

• Macros may be nested 32 deep 

• 25 Assembler psuedo-ops 

• 5 Conditional assembler psuedo-ops 

• 40 Error codes to pinpoint problems 

• 16 Error codes related to Macros 

• Warm-start button 

• Enhanced monitor with 16 commands 




...a completely solid state firmware system ...all in ROM and RAM. No 
tapes to load. The system is available from the time you turn on your PET to 
the time you shut it off. 

15 chips on a single high quality printed circuit board; interfaces with PET's 
parallel address and data bus or with Skyles Memory Adapter. A 
comprehensive 170 page manual is included 

Truly, there is simply no other system of this magnitude at anywhere near 
this price. $395.00* 

'California residents please add 6% or 6 5% sales lax as required 

VISA, MASTERCHARGE ORDERS CALL (800) 538-3083 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (408) 257-9140 



Skyles Electric Works 



231 E South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 



Define Your Own Function Key on PET 



If there is a commonly used BASIC function which you 
would like to be able to call easily from the keyboard, 
then use the program provided here and see how easy it 
really is. 



Werner Kolbe 

Hardstr. 77 

CH 5432 Neuenhof 

Switzerland 



The following small program 
"Function Key" enables you to 
define your own command using the 
key &. The definition of the com- 
mand is stored in the second 
cassette buffer and is available as 
long as PET is not switched off, or 
until the command is defined new. 

Using the Program 

Load and run the program Func- 
tion Key. Listng 1 is for the new 
ROMs and listing 2 is for the old 
ROMs. The program asks you for 
your command definition. You enter 
a BASIC program line for example: 

?"THE TIME IS NOW " Tl$ 

The line should not contain more 
than 77 characters, as usual for a 



BASIC program line. Then you press 
"RETURN" and your command is 
defined. 

Now whenever you press &, 
followed by RETURN, your special 
command is executed. In our exam- 
ple, the time will be printed. It is also 
possible to use the command in a 
program. In the same way as PET 
executes a PRINT whenever it finds 
a ?, it will execute your command on 
the occurence of the &. The new 
command does not disturb any of 
the other functions of your PET, 
unless you own a floppy disk 
system. In this case the program 
must be changed slightly. 

Program Description 

Even though the program is short 



its operation is complex. The princi- 
ple is as follows: Your BASIC code 
is inserted as line in the program. 
It is then shifted into the second 
cassette buffer starting at dec. 895. 
A second line containing a SYS 870 
is added. Then a loop is inserted in- 
to PET's CHAR GET routine to see if 
the character & occurs. If an & was 
found the registers and pointers are 
saved and then the processor is set 
to the "execute a line routine", 
where the code pointer is set to the 
place dec. 895. As the code ends 
with a SYS870, a jump back to the 
machine code is executed where the 
registers and pointers are restored 
before normal operation goes on. 

I added a disassembly of the 
machine code (old ROMs) for those 
who want to understand the whole 
program in more detail (listing 3). 



FUNCTION KEY 
LISTING 1 NEW ROM 

5 PRINTS" 

1 FOR I =8 1 3T0890 : REflDK : POKE I , K = NEXT 
20 OPEN1,0:PRINT"ENTER VOUR FONT I ON ! " 
40 PRINT"©:".; 

45 GETftf : PR I NTH* ; : I Ffi*OCHR* < 1 3 ) THEN45 
50 PR I NT " 1 SVS870 " : PR I NT " DOTO60S8" ; 
55 POKE 1 53, 3 = FORI =623T0625 : POKE 1,13: NEXT : END 
60 FOR I =395T0995 : fi=PEEK < I + 1 34 > = POKE I ., fl = NEXT 
70 SVS813-HEW 

500 DflTfl 1 69 , 76 , 1 33 ,112,1 69 , 58 , 1 33 , 1 1 3 , 1 69 , 3 , 1 33 ,114, 9b 
510 DHTH230, 119, 208, 2, 230, 120, 32, 1 18, 0, 201 , 33, 240, 3, 76, 113, 0, 140 
515 DflTfl254, 3, 142, 253, 3, 165, 119, 133, 1 , 165, 120, 133, 2, 186, 134, 0, 169 
520 DflTfl 1 27 , 1 33 , 1 1 9 , 1 69 , 3 , 1 33 ,120 , 76 , 247 , 1 98 , 1 66 , , 1 54 , 1 65 ,1,1 33 ,119 
525 DflTfll65,2, 133, 120, 172,254,3, 174,253,3,76,58,3,0 
READY. 
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FUNCTION 

LISTING ; 



KE U 



OLD 



ROM 



5 PRINT'S" 

10 FORI=813TOS90 : RERDK : POKEI , K : NEXT 
20 OPEH1,0:PRINT"ENTER VOUR FUNCTION ! 
40 PRINT"©:"; 

45 6ETfi*:PRINTfi$; : IFRfOCHR* <13>THEN4S 
50 PR I NT " 1 SVS870 " : PR I NT " GOTO60S" ; 
55 P0KE525 , 3 : FOR I =527T0529 = POKE 1,13: NEXT = END 
60 FOR I =895T0995 : R=PEEK < I + 1 34 > ■' POKE I , fl •" NEXT 
70 SVS313:NEW 

500 DRTfl 1 69 , 76 , 1 33 , 1 94 , 1 69 , 53 , 1 33 , 1 95 , 1 69 ,3.1 
510 DHTR230, 201 , 208, 2, 230, 202, 32, 200, 0, 201 , 38 
515 DRTR254, 3, 142, 253, 3, 165, 201 , 133, 1 , 165, 202 
520 DRTR127, 133, 201 , 169, 3, 133, 202, 76, 233, 198, 
525 DRTR165, 2, 133, 202, 172, 254, 3, 174, 253, 3, 76, ! 
REfiDV. 



33, 196 


96 










,240,3 


76, 


200 , 


0, 


140 




,133,2. 


ISt 


, 1 34 


,£ 


,169 




166,0, 


154, 


165, 


1, 


133,; 


201 


58,3,0 













Listin 


g 3 




32D 


R9 


4C 




32F 


35 


C2 




331 


Fig 


3fl 




O "■". 


85 


C3 




335 


R9 


03 




337 


85 


C4 




339 


60 






33fl 


E6 


C9 




33C 


DO 


02 




33E 


E6 


Cfl 




340 


20 


C8 


00 


343 


C9 


26 




345 


FO 


03 




347 


4C 


cs 


00 


34fl 


8C 


FE 


03 


34D 


8E 


FH 


03 


350 


R5 


C9 




352 


85 


01 




354 


R5 


Cfl 




356 


85 


02 




353 


BR 






359 


86 


00 




35B 


R9 


7F 




35D 


85 


C9 




35F 


R9 


03 




361 


85 


Cfl 




--'DO 


4C 


E9 


C6 


366 


FI6 


00 




363 


9fl 






369 


R5 


01 




36B 


85 


C9 




36B 


R5 


02 




36F 


85 


Cfl 




371 


RC 


FE 


03 


374 


RE 


FD 


03 


377 


4C 


3fl 


03 


37R 


00 







J^ 



LI 



L3 



LDH =4C 
STfl Zl 
LUfi =3fl 


Change the first 3 
bytes of the CHR GET 


STfl Z2 


routine to 


LDfl =03 
STfl Z3 
RTS 
INC Z4 


JMP 033A 


Get character A 


BNE LI 




INC Z5 




JSR J2 




CMP =26 


& ? 


EEC! L3 




JMP J2 


no, return 


STV Wl 


save registers and 


STX 142 

LDfl Z4 


stack pointer 


STfl Z6 




LDR Z5 




STfl Z7 




TSX 




STX ZERO 




LDfl =7F 




STfl Z4 




LDfl =03 




STfl Z5 




JMP J4 


execute shifted pgm 


LBX ZERO 




TXS 




LDfl 26 
STfl Z4 


restore everything 


LDfl Z7 




STfl Z5 




LBV Ml 




LBX N2 




JMP J5 


go on V^ 


BRK 





Ow 



MICRO'S FIRST ANNUAL 
Limerick Contest Winner 



The votes are in and we have a 
winner! Art Carpet of Canyon 
Country, California wins a year's 
free subscription to MICRO for his 
winning entry: 

"There was a young hacker named 

Drew 
Who programmed all day and 

night too. 
By morning 'twas done 
But he didn't type run 
The poor little guy entered new." 

Our congratulations to Mr. 
Carpet and our thanks to all who 
entered and/or voted in this, our 
first, Limerick Contest. 



. 



Judge tills character generator for yourself • 




Regular PET Graphics 



*$» 



& 



& 



& 



^ 



HAL GRAPHICS 



^ 



AS 







gP 









JP 



# 



SP ^ 



*y 



Compare the two Snoopys and 
you'll begin to see why the new 
HAL PCG 6500 is attracting so 
much attention. It's the program- 
mable character generator for your 
PET that gives sharp, detailed 
graphics. 

Important features include: 

• Storage for 64 new characters 

• Built-in CB2 sound amplifier that produces all 
tones in the human hearing range 

• PCG Manual and demo program 

• Interface to PET/CBM with 24 pin character gen- 
erator ROMS. ( If your PET uses 28 pin ROMS, 
Conversion Kits are available for $45. To simplify 
ordering, please indicate memory RAM # 21 14 
or "6550. ) 

The HAL PCG 6500 is available exclusively at 
Systems Formulate . . . 



Only $ 200 



1 plus JS shipping S? handling ) 
Add $45 for 28 pin Conversion Kit 



MIPLOT: the right plotter at the right price 

Designed for straight forward interface to any 
microcomputer that outputs the ASCII code. 
MIPLOT can even be used by operators with no 
plotter experience. 

• Incorporates pre programmed "intelligent" functions 
required for producing graphs and drawings 

• Solid and broken line types can be specified 

• Built in character generator for letters, numbers and 
symbols 

• Characters can be enlarged and rotated to four 
orientations 

• Special printer mode outputs character data as-is 

• Uses commonly available hard fiber-tip pens 

• Maximum plot speed approximately 2 inches per 
second 

• Built in self-test mode 




MIPLOT by Watanabe Corporation 



Only $1,200 

at SystemsFormulate Corporation 

( plus shipping & handling ) 



ADCOM Light Pen (with sound) . . . Only *34 98 



Unlike many light pens, the ADCOM interfaces 
with PET through the second cassette port rather 
than the parallel port. The result? Sound! 



( plus 82 shipping fif handling ) 

Ready to plug in, no assembly necessary. 

Faster than many other light pens designed for PET. 

Built-in sensitivity control. 

Machine language and demo program included for ease 

of programming. 



Expand with the finest in micro peripherals, systems and software from Systems Formulate. 

Call today for more information or to place your phone order: (415) 326-9100 

We honor Master Charge, Visa, check or money order. 

(California residents add 6.5% tax ) 
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Ueciaion 
Qystems 



Decision Systems 

P.O. Box 13006 
Denton, TX 76203 



INDEXED FILES 



$50 



ISAM-DS is an integrated set of routines for the creation and manipulation 
of indexed files. ISAM-DS provides capabilities comparable to those on 
large mainframes You can rapidly retrieve records by key value or partial 
key value (retrieves any record m a 200 record file. 60 char/record, in less 
than 3 seconds compared to a maximum of 38 seconds for a DOS sequen- 
tial file) Files never have to be reorganized. Duplicate key values may be 
used Records may also be retrieved m sequence. ISAM-DS routines are 
easily integrated into Applesoft programs - they use less than 3K RAM 
plus an index table. 

Requires: Disk. Applesoft 



STRUCTURED BASIC 



S3S 



PBASIC-DS is a sophisticated preprocessor for structured BASIC. Now 
you can gam the power of PASCAL Itke logic structures at a fraction of the 
cost Use all regular BASIC statements plus 14 commands and 11 new 
statements/structures (WHILE, UNTIL, CASE, otc ) PBASIC-DS can be 
used to develop INTEGER or APPLESOFT programs. It is a great way to 
learn and use structured logic concepts 

Requires Disk. Applesoft 148K ROM) 

DATA ENTRY $25 

FORM DS is a system of programs and routines that assist in the entry, 
editing and display of data Describe screen formats by simply typing them 
on the screen Automatic range tests for input data Display edited numeric 
values with commas inserted, etc. Dump the screen contents to a printer. 
Routines are easily incorporated mto Applesoft programs. Documentation 
included. 

Requires: Disk. Applesoft (32K ROM) 



(Texas residents add 5% taxi 
(Add $4.00 for Foreign Mail) 



'Apple II is a registered trademark ol the Apple Computer Co 




DEPRECIATION 

PROGRAM 



5 DEPRECIATION RATES 

UP TO 99 YR TERM 

RECORDS UP TO 600 ITEMS ON DISK 

UP TO $1 MILLION FOR EACH ITEM 

REPORTS EACH MONTH, QUARTER, OR 
ANNUALLY 

BONUS DEPR., INVESTMENT CREDIT 

PRO-RATES DEPRECIATION 

UPDATE RECORDS EACH YEAR 

EQUIPMENT INVENTORY 

FISCAL YEAR BASED 



CONVERT METHODS ANY TIME 
AN ACCOUNTANTS DREAM 



«*■ 



*£ 



APPLESOFT 32K MIN. . 9 O c f > S2SfcaOl50.00 

HANDBOOK $5.00 ^<«- 



VISA &M/C USERS -CALL 
509-943-9004 



M0NEYDISK 
516WELLSIANWAY 
RICHLAND, WA 99352 



VISA 



APPLE IS A REGISTERED TRADEMARK 
OF APPLE COMPUTER INC. 
WA Residents, add 5% sales tax 

DEALER INQUIRIES INVITED 



NIKROM TECHNICAL PRODUCTS PRESENTS 

A DIAGNOSTIC PACKAGE FOR THE APPLE II 

AND APPLE 11+ COMPUTER. 

"THE BRAIN SURGEON" 

ALL MAJOR COMPUTER SYSTEMS ARE CHECKED FOR FUNCTIONAL HARDWARE 
ANALYSIS ON A REGULAR BASIS FOR LOGICAL AS WELL AS SOME PRACTICAL REASONS 
FINDING WHAT IS EXACTLY WRONG CAN ACCOUNT FOR THE MOST PART OF MONEY 
CONSUMING DOWN TIME WHILE HAVING YOUR DEALER REPAIRING THE SYSTEM. 

APPLE COMPUTER CO HAS PROVIDED YOU WITH THE BEST EOUIPMFNT AVAILABLE TO 

DATE AND THE DIAGNOSTIC'S PACKAGE WAS DESIGNED TO CHECK EVERY MAJOR AREA 

OF YOUR COMPUTER. DETECT ERRORS. AND REPORT ANY MALFUNCTIONS. OFTEN 

BEFORE THEY BECOME SERIOUS THE BRAIN SURGEON WILL PUT YOUR SYSTEM 

THROUGH EXHAUSTIVE. THOROUGH PROCEDURES TESTING AND REPORTING ALL 

FNDINGS 

THE TESTS INCLUDE: 

MOTHERBOARD ROM TST FOR BOTH APPLE II AND APPLE 11 + 
APPLESOFT CARD TEST INTEGER CARD TEST 

MEMORY RAM TEST DISK ANALYSIS MONITOR ALIGNMENT 

DC HAYES MICRODODEM II TEST 

SYSTEM DIAGNOSTICS IS AN INVALUABLE AID TO YOUR PROGRAM LIBRARY EVEN IF 
YOUR SYSTEM IS WORKING FINE. HOURS HAVE BEEN WASTED TRYING IO TRACK DOWN 
A -PROGRAM BUG'' WHEN ACTUALLY HARDWARE COULD BE THE BLAME 1 
THE BRAIN SURGEON ALLOWS YOU TO BE CONFIDENT OF YOUR SYSTEM. THIS CAN BE 
CRITICAL WHEN FILE HANDLING. SORTS OR BACKUPS ARE INVOLVED YOU DESERVE TO 
BF AS SURE OF YOUR COMPUTER DURING ALL THESE CRITICAL TIMES. RUNNING THE 
BRAIN SURGEON PRIOR TO THESE IMPORTANT FUNCTIONS HELPS TO INSURE THAT 
YOUR SYSTEM IS OPERATING AT PEAK PERFORMANCE 

THE BRAIN SURGEON IS EASY TO USE AND SUPPLIED 

ON DISKETTE WITH COMPLETE 

DOCUMENTATION 

PRICE: $39.95 
REQUIRES: 32 or 48K' 
APPLESOFT: I DISK DRIVE 

NIKROM TECHNICAL PRODUCTS 
25 PROSPECT STREET 
LEOMINSTER. MA 01453 

APPLE is Registered 
Tiade Mark ol Apple Computer Co 




PET and APPLE II Users 
PASCAL 

ABACUS Software makes available its version of TINY PASCAL for 
the users of two of the most popular personal computers. 

TINY PASCAL is a subset of the standard PASCAL as defined by 
Jensen and VVirth. It includes the structured programming 
features: IF-THEN-ELSE, REPEAT-UNTIL, FOR TO/DOWN TO-DO, 
WHILE-DO, CASE-OF-ELSE, FUNC and PROC. Now you can learn the 
language that is slated to become the successor to BASIC. 

TINY PASCAL is a complete package that allows you to create, 
compile and execute progams written in the PASCAL language. 
You can save source and object code on diskette or cassette (PET 
version only). Comprehensive user's manual included. The manual 
can be examined for $10 (refundable with software order). 

REQUIREMENTS 

PET 16K/32K New ROMS cassette $40 

PET 16K/32K New ROMS diskette $35 

Apple II 32K Applesoft ROM w/DOS $35 

Apple II 48K Applesoft RAM w/DOS $35 

TINY PASCAL User's Manual $10 

6502 Interpreter Listing $20 

FREE postage in U.S. and CANADA 
All orders prepaid or COD 



master charge 
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ABACUS SOFTWARE 

P. O. Box 7211 
Grand Rapids, Michigan 



49510 



An Improved Morse Code Receive Routine 
and Interface 



Here are hardware and software enhancements to the 
article that appeared in Feb 1980 (21:19). The material 
contains information on interfacing to a 6522 VIA that is 
independent of the ham radio application. 



Marvin L. DeJong 

Dept. of Math & Physics 

The School of the Ozarks 

Point Lookout, MO 65726 



In the February 1980 issue of 
MICRO (21:19) we described a pro- 
gram that used the AIM 65 keyboard 
to send Morse code and the AIM 65 
20-character display to output 
received Morse code. The interface 
circuit that was used to interface 
the receiver to the transmitter for 
the purposes of receiving Morse 
code used an LM567 tone decoder. 
It appears from the feedback that I 
have received that the LM567 has 
such a narrow bandwidth that it is 
difficult to tune the received signal. 
What follows is a different approach 
to a receive routine, and a different 
interface. The program should be of 



AUDIO INPUT 




10K 



interest to any computer owner who 
has a 6522 VIA in his system, not 
simply AIM 65 owners. With a few 
modifications, given in the Appen- 
dix, it can be used with the program 
described in the February issue of 
MICRO. 

We begin by describing the new 
interface circuit that was used. Its 
function is to change the sine wave 
audio output from the receiver to 
pulses that have the shape of a 
square wave. These pulses are 
counted by the T2 counter/timer on 
the 6522. The interface circuit is 
shown in Figure 1. The LM386 acts 



il 



5V 



100K 



LM386 



5 



.Olmf 



• 02mf 



555 



1 100K 1 



as an audio amplifier, while the 555 
is configured as a Schmitt trigger. 
The gain control on the receiver and 
the 10K potentiometer in the inter- 
face circuit are adjusted to give a 
comfortable listening level while the 
LED in the circuit in Figure 1 flashes 
only occasionally when no tone is 
present. That is, the noise level 
should be kept between the trigger 
thresholds of VWc and 2 /jV c on the 
555 timer. When a tone from a 
transmitting station is in the pass- 
band of the reciever, the 555 should 
toggle back and forth at the same 
frequency as the tone input, produc- 
ing a square wave input on PB6, and 

Q+5V 



270 
AA/WVi 



®» 



-K> 



1 



.Olmf 



<7 



Figure 1: Interface circuit between the receiver 
and PB6, the pulse counting pin. 
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the LED will glow. These square 
wave pulses are counted by the T2 
counter/timer. Counting noise 
pulses and static crashes (QRN) will 
produce various forms of useless 
and meaningless output, so keep 
the gain controls low enough to re- 
ject most of the noise. Best recep- 
tion is obtained with a good sharp 
audio filter and just enough gain to 
detect the tone but not the noise. 

The program is given in Listing 1. 
The part of the listing with com- 
ments is the basic code reception 
program that can be used with any 
microcomputer having a 6522 VIA 
and some kind of output device 
such as a teleprinter or a video 
monitor. Provided the subroutine 
jumps are modified accordingly, the 
commented program and sub- 
routines are relocatable. The Morse- 
ASCII look-up table must also be 
loaded for the receive routine to 
work, and you must provide a 
suitable output routine that takes 
an ASCII character in the ac- 
cumulator and outputs it. This is the 
JSR OUTCH instruction at $07BE. If 
you have an AIM 65, use the 
subroutines listed in the AIM 65 for- 
mat, which may also be relocated. 

The receive routine automatically 
sets the code speed and will copy 
up to about 70 words per minute. 
Speeds less than about 20 words 
per minute do not work very well 
because the locations that hold the 
various character length parameters 
overflow. The comments should 
make the general flow of the pro- 
gram clear. Basically, the T2 
counter/timer counts pulses from 
the receiver. If a pulse is not 
counted, a space counter (SPACE) is 
incremented at a 750 Hz rate. Thus, 
the receive routine returns to 
subroutine COUNT once every 1/750 
second. If a pulse has been counted, 
MARK is incremented, otherwise 
SPACE is incremented. Refer to the 
listing to see that in STATE1 the pro- 
gram is waiting for a mark of 
sufficient length ( 3 A of the dot 
length) to appear. When it does, the 
program makes the transition to 
STATE2, where it waits for the 
space counter to reach % the dot 
length. At this time it is assumed 
that the mark has been completed 
and the program jumps to STATE3 
where it is decided whether the 
mark was a dot or a dash. The 
character register is modified 
accordingly, and the calibration 



Listing 1: Morse code receive routine. 



0F00 D8 


START 


CLD 


0K01 A 9 20 




LDA $20 


0F03 8D OB A0 




STA ACR 


0FO6 85 0D 




STA DOT 


OF08 85 0C 




STA MARK 


0FOA 78 




SEI 


0F0B 20 AC OF 




JSR CAL 


0FOE A 9 01 




LDA $01 


0F10 85 0A 




STA CHAR 


0F12 20 80 OF 




JSR TIMER 


0F15 A9 00 


STATE1 


LDA $00 


0F17 85 OB 


RPT 


STA SPACE 


0F19 85 OC 




STA MARK 


0F1B 20 8B OF 


CNT 


JSR COUriT 


0F1E A5 CC 




LDA MARK 


0F20 C5 OF 




CMP 3/iD0T 


0F22 BO 08 




BCS STATS2 


0F2/, A 5 OB 




LDA SPACE 


0F26 C5 OD 




CMP DOT 


0F28 BO EB 




BCS STATE1 


0F2A 90 EF 




BCC CNT 


0F2C A9 00 


STATE2 


LDA $00 


0F2E 85 OB 




STA SPACE 


0F30 20 8B OF 


MORE 


JSR COUNT 


OF33 A 5 OB 




LDA SPACE 


OF35 C5 OE 




CMP )/2DOT 


OK37 90 F7 




BCC MORE 


OF39 06 OA 


STATE3 


ASL CHAR 


0F3B A 5 OC 




LDA MARK 


0F3D C5 12 




CMP 2D0T 


0F3F 90 OC 




BCC ARND 


OF/,1 E6 OA 




INC CHAR 


OF43 W 




LSR A 


OF/,4 iA 




LSR A 


0F(,5 85 OC 




STA MARK 


OF/,7 a 




LSR A 


OF48 18 




CLC 


0F49 65 OC 




ADC MARK 


0F4B 85 OC 




STA MARK 


0F4D 20 AC OF 


ARND 


JSR CAL 


0F50 A9 00 




LDA $00 


0F52 85 OC 




STA MARK 


OF % 20 88 OF 


LOAF 


JSR COUNT 


OF57 A 5 OC 




LDA MARK 


OF59 C5 OF 




CMP 3/iDOT 


0F5B BO CF 




BCS STATE2 


0F5D A 5 OB 




LDA SPACE 


0F5F C5 12 




CMP 2D0T 


0F61 90 Fl 




BCC LOAF 


OF63 20 00 OE 




JSR SPEED 


0F66 A 9 01 




LDA $01 


0F68 85 OA 




STA CHAR 


0F6A 20 8B OF 


LOITER 


JSR COUNT 


0F6D A 5 OC 




LDA MARK 


0F6F C5 OF 




CMP 3/4D0T 


0F71 BO B9 




BCS STATE2 


0F73 A 5 OB 




LDA SPACE 


OF75 C5 13 




CMP 5D0T 


OF77 90 Fl 




BCC LOITER 


0F79 20 B6 07 




JSR OUTPUT 


0F7C A 9 00 




LDA $00 


0F7E FO 97 




BEQ RPT 

* a a r R-"X"K H X H X * X JC W r X X 

SUBROUTINE TIMER 


0F80 A9 A7 


TIMER 


LDA $A7 


0F82 8D 95 AU 




STA TIME/8 


0F85 AD 08 AO 




LDA T2CL 


0F88 85 18 




STA STORE 


0F8A 60 




RTS 

**»X«**iHHHHHHHH* 

SUBROUTINE COUNT 


0F8B 58 


COUNT 


CLi 


0F8C 78 




SEI 


0F8D 2C 97 A4 


WAIT 


BIT TMFLA5 


0F90 10 FB 




BPL WAIT 


0F92 38 




SEC 


QF93 A5 18 




LDA STORE 


0F95 ED 08 AO 




SBC T2CL 


0F98 85 19 




STA TEMP 


0F9A 20 80 OF 




JSR TIMER 


0F9D A5 19 




LDA TEMP 


0F9F FO 08 




BEQ AHED 


OFAl 18 




CLC 


0FA2 65 OC 




ADC MARK 


OFAi, 85 OC 




STA MARK 



Clear decimal mode for all additions. 

Set up T2 counter/timer to count pulses 

by loading the ACR of the 6522 with $20. 

Also initialize dot counter to $20, and 

mark counter to $20. 

Do not allow interrupts to bother this 

routine. Before starting to receive, 

calibrate the various registers. 

Initialize the character register to $01. 

Jump to start space timer. 

Clear mark and space counters. 

Next we will jump to subroutine COUNT 

to increment the number of pulses from 

the receiver that have been detected. 

If the pulses have exceeded 3/4 those 

in DOT, a mark has been detected. Then 

jump to STATE2 to wait for a space. 

If space counter exceeds one dot, start 

over in STATE1. 

Otherwise, continue counting marks and 

spaces. 

Begin STATE2 by clearing space counter. 

Then count marks and spaces. When SPACS 

exceeds 1/2 dot length, then space has 

been detected. Go to STATE3. Otherwise 

count some more. 

A mark element has been detected, shift 

character register left. If the mark 

length exceeded 2 dots, then it was a dash. 

If a dot, do not put a one in CHAR. 

If a dash, add a one to the character register. 

Convert the dash length to a dot by multiplyir.; 

by 3/8. 



Jump to calibration routine to update 

automatic calibration of DOT. 

Clear mark counter. 

Start coxmting again.. If a new mark is 

detected, go to STATE2. Otherwise wait 

for a character space. 

Has space exceeded 2D0T? That's a 
character space so output the character. 
Otherwise, return to count some more. 
Subroutine speed measures the speed and 
outputs the speed and the new character. 
Reset the character register. 
Then wait for more pulses and spaces. 
Has a new mark been detected. If so, 
jump to STATE2. 

Does space exceed 5DOT. If so, a 
word space has been detected. 

Output the word space. 
Clear accumulator. 
Back to STATE1. 



Load divid-by-eight timer for 16? 
counts, or 1336 microseconds <- l/?50. 
For lOOCHz tone use $7D rather than $A7. 
Read K counter and store. 
Then return. 



Allow an interrupt here (for author's 

send routine. ) 

Has timer timed-out? 

No. Then wait. 

Yes. Then count the pulses that have 

been detected by T2. 

Save pulse count here for a moment. 

Start the timer again. 

Get the pulse count again. 

If no pulses, then increment space 

counter. If pulses, then add the 

number to MARK. 
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0FA6 18 
0FA7 90 02 
0FA9 E6 OB 
OFAB 60 

Change thi3 



CLC 

BCC DETOUR 
AHED INC SPACE 

DETOUR RTS 

to JSR OUTPUT (20 B6 07) 



OFAC 
OFAE 
OF BO 
0FB2 
0FB3 
0FB5 
0FB6 
0FB8 
0FB9 
OFBB 
OFBD 
OFBF 
0FC1 
0FC2 
0FC4 
0FC5 
0FC6 
0FC8 
OFCA 
OFCC 
OFCD 
OFCF 
OFDO 
0FD2 
0FD4 



46 OC 
A5 OD 
46 OD 
18 

65 OC 
18 

65 OD 
4A 

C9 OF 
BO 02 
A9 OF 
85 OD 
OA 

85 12 
OA 
18 

65 OD 
85 13 
A5 OD 
4A 
85 OE 

w 

65 OE 
85 OF 
60 



CAL 



SKIP 



LSR HARK 

LDA DOT 

LSR DOT 

CLC 

ADC HARK 

CLC 

ADC DOT 

LSR A 

CMP $0F 

BCS SKIP 

LDA $0F 

STA DOT 

ASL A 

STA 2D0T 

ASL A 

CLC 

ADC DOT 

STA 5D0T 

LDA DOT 

LSR A 

STA 1/2D0T 

LSR A 

ADC 1/2D0T 

STA 3/4DOT 

RTS 
IHHHf 
SUBROUTINE OUTPUT 



Skip around space increment instructions. 

Increment space counter if no pulses 
detected, then back to the program. 

if you do not have an AIM 65. 

Divide Mark by 2. 
Cet previous DOT. 
Divide previous DOT by 2. 



07B6 A5 OA 
07B8 09 80 
07BA A8 
07BB B9 00 04 
07BE 20 72 06 
07C1 20 60 06 
07C4 60 



OUTPUT 



LDA CHAR 

ORA $80 

TAY 

LDA TAB.Y 

JSR OUTCH 

JSR DISP 

RTS 



routine is called to update the dot 
length. The program then waits until 
a new mark is received, or if the 
space counter reaches twice the dot 
length then a character is printed. If 
a new mark is received the program 
jumps back to STATE2. When the 
space counter reaches five time the 
dot length, a word space is printed, 
and the program jumps back to 
STATE1. 



DOT plus MARK/2. 

DOT plus MARK/2 plus DOT/2. 

New DOT = 3/4 DOT plus l/4 HARK 

Is New DOT too short (noise problems)'; 

Yes, use $0F as minimum DOT length. 
We have a new DOT length. 
Calculate 2D0T. 

Calculate 5D0T. 



Calculate 1/2D0T. 
Calculate 3/4D0T. 



Get contents of character register. 
Put a one in bit seven. 
Transfer this to the Y register and 
look up the ASCII code in the look-up 
table. Use your own subroutine to 
output the ASCII character to your 
output device (teleprinter or CRT). 
The routines here are for the AIM 65. 



receiver has a different tone fre- 
quency. 

Appendix 

To use this program with the 
send/receive program in the Feb. 
1980 issue of MICRO, make the 
following changes in the listing 
given there, in addition to loading 
the program and subroutines listed 
here: 



AIM 65 users will want to use 
subroutine SPEED where it is called, 
while other microcomputer owners 
will use subroutine OUTPUT at this 
point. Subroutine SPEED converts 
the dot length to a code speed in 
words per minute and displays this 
number on the left-most digits on 
the AIM 65 display. Remember, this 
is only a crude approximation to the 
exact speed, unless your CW output 
tone on your receiver is exactly 750 
Hz. The subroutine TIMER is set for 
a period corresponding to the period 
of the tone from the receiver. The 
byte given at $0F81 corresponds to 
1333 microseconds, the period of a 
750 Hz tone. This byte may be 
modified to be equal to the period of 
some other tone frequency if your 



$0575 $60 instead of $40 
$0655 $00 instead of $20 

$0656 $0F instead of $08 

$0F03 $0F05 $EA, $EA, $EA in 

Listing 1 In this article. 
$07B6 Use the subroutine given 

in Listing 1. 

I would really like to hear from 
someone who makes a comparison 
between the program and interface 
described here and the one describ- 
ed in the earlier article in MICRO. 
The program described here is a 
novel approach, intended to be more 
immune to noise, and has worked 
very well for me. But I would like to 
hear from you if you have any sug- 
gestions, improvements or criti- 
cisms. 



AIM-65 output subroutines 



8660 R2 LDX #l_s 
8662 SR TXfi 
8SS3 48 PHfl 

0664 BD LDfi 943 
666" 89 ORfi #88 



2663 


28 


JSR 


Z- T '. 


I/l ~. T-. | J 


68 


P \ H 




966D 


fifi 


Tfik 




066E 


Cfl 


npv 




066F 


18 


D p ; 


86?: 


8671 


! -- : 


R T 5 




0672 


80 


■■-" T ~ 


R4* 


8675 


fl2 


LDX 


#81 


8577 


p ■- . 


LDfi 


94^ 


867R 


Cfl 


DE'K 




C '- ;?o 


9f:-- 


C T ilj 


A4: 



y \j i r ^ i i- '■'*• — 

)T J w '— l ^ ^ M f* P 1 '?! """ '1 ~ • 
fit iT Q =. Ci '.' > Pi V W ' v>. 

8687 BD LDfi 9.43fi> 
868fi E8 INK 

86SE Cfl DE-K 

068F Cfl DEK 

8698 18 BPL 868.' 

86^2 Fifl LDfl #28 

0697 20 JSR BS6d 

SfcyD HI? Lufl TTii^ 

869F 9D 9T9 9438. 
8692 Cfl DEH 

86fi3 10 BPL 069F 

Ci £ i-i p : £ {7i fit T -. 

06flD B8 BC5 86BF 
. 6B2 99 uDfl &ii 



£*• 


F'n 


C O :~* 


f. 


flfi 


TfiK 


-r 


99 


L. is ii i 


3 


9D 


''•■ T H ? 


■~ 


'~ : £i 


T c c*- 


F 


68 


RTS 
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Subroutine Speed 



8E82 35 STR 10 
8E8* R2 LDX #09 
8E86 R9 LDR #34 
8E88 35 STii S3 
8E0H R3 LDR #03 

0E0E R5 LDH 33 

8E12 35 STR 33 



8E1B B8 BCS 0E0E 

0E1D 36 SIX 03 

@ E 1 F R 9 L D 3 # 

8E2i 35 STR 10 

8E23 F8 SED 

3E24 R0 LDV #03 

8E26 06 RSL 08 

o i- o o fi -j l l-- n j. '3 

fy iz ii! m & D H L- ! L- X v 

8E22 85 STR 10 



8E2F D BNE 3 E 2 £.< 

8E32 R2 LDX #81 
8E34 R5 LDR 10 

8E33 69 RD2 #30 

8E3E R5 LDR 10 

8E46 4fl LSR . R 

8E41 4R LSR . R 

8E42 4R LSR - R 

8 E 4 4 C R D E '■■'. 
8E45 38 Bill 0E43 
8E47 18 BPL 8E38 

6E40 68 RTS 



MORSE-ASCII Look-up Table 



CM>=0489 28 28 45 54 









•_ ! 4?^ 


*T '_- 


2v 


nH 


4f 


0498 


42 


~ i* 


4 j> 


59 


0498 


54 


=• .- 


20 


■7 ;7* 


04R0 


~t e; 


i-i 


20 


33 


j/j i P; i 


2 8 


Z : '~* 


T' '"*! 


32 


H4RS 


'"'■ i-'i 


20 


'"■• i~* 


'"''^ 


04R3 


20 


.-'* r'T 


20 


31 


04 B0 


26 


~*M 


•".'■■ C 


iv 


4 B 4 


20 


28 


20 


29 


04B8 


— . _, 


-z.'O 


~> d 


•"■ ;7; 


0438 


JH 


28 


13 


3 8 


0438 


20 


20 


28 


23 


0434 


20 


20 


20 


SS 


0438 


20 


fi,V 


— K. 1 


i. v 


i?4UU 


SF 


20 


20 


£§ 


04D8 


20 


;"•;% 


28 


ii. v 


04D4 


20 


~ : -- 


~" ;T-i 


28 


04D8 


2 


*~ ! ;Ti 


'":> d 


\r iT-r 



84* 



84 49 4: 



'J- - !- 



•-. > 04u8 20 28 20 20 

< > 04E0 20 20 20 20 

< > 04E8 20 20 28 20 

< > 04E8 28 20 20 20 



SQFTffMRE 



FOR 



051 



Video Games 1 

Head -On. Tank Battle, Trap! 

Video Games 2 

Gremlin Hunt, Indy 5000, Gunfight 

Board Games 1 

Cubic, Mini- Gomoku 

Dungeon Chase 

A real- time, D&D , video game 

C1 Shorthand 

Two key command entry 



$15 
15 
15 
10 
12 



One tape supports all recent ROM systems. 

Color and sound on video games. Some 
programs on disk. 

FREE CATALOG 

Orion Software Associates 

147 Main Street 

Ossining.NY 10562 



All ABOUT 

OSI 

BASIC-IN-ROM 

BASIC and MONITOR Reference Manual 

Aardvark Journal: "It Is the book you were hop- 
ing was packed with your computer at the factory." 

PEEK-65: ". . . goes far enough. . . to hold the in- 
terest of advanced programmers . . ." 

All statements and commands are explained. Loops. 
Arrays. Bugs. Tapes. BASIC, Auto-load and 
homemade. 

USR(X). Floating Point. Variable tables. Binary Struc- 
ture of Source Code. Maps of pages $00, 01, 02, FE, 
FF. Location of routines end SAO — BF. 

From your OSI dealer or software house or send 
check to me, $8.95 postpaid. (COD $1.10 extra) 



E. H. Carlson 
3872 Raleigh Drive 
Okemos, Ml 48864 






Un dedicating a Dedicated Microcomputer 



Some valuable ideas are presented here toward develop- 
ing a time-shared process controller. 



David Borton 
4 Kenworth Ave. 
Troy, NY 12180 



Introduction 

Programs which use microcom- 
puters for dedicated control often 
have two problems. One problem is 
lack of flexibility. Because the pro- 
grams are either stored in EPROM 
or else they must be reassembled 
and reloaded into RAM, the control 
routines are difficult to change. A 
second problem is that the control 
routines can tie up the whole com- 
puter for only one dedicated ap- 
plication. While working on a pro- 
ject at Rensselaer Polytechnic In- 
stitute I have developed a dedicated 
controller that solves both of these 
problems. 

Background 

The project at RPI is the develop- 
ment of a solar energy collector. See 
Figure 1. The collector is a Fresnel 
reflecting concentrator which 
redirects solar power to a monotube 
boiler where cold water absorbs the 
solar energy and becomes hot 
steam. In order to keep the concen- 
trated sunlight in the boiler, this 
type of collector follows the sun 
across the sky by means of two rota- 
tion axes. When the sun is out, this 
2-axis tracking of the sun is 
straightforward and can be done 
with discrete logic without a 
microcomputer. Often, however, the 
sun is not out for variable portions 
of the day, and while it is behind 
clouds, it continues its motion 
across the sky. When the sun comes 
out again the collector is no longer 
aimed at the sun, and therefore the 
collector must have' a large, high 
power, expensive motor and/or take 



a long time to reposition itself 
toward the sun. A microcomputer, 
however, can easily track the sun 
while it is behind clouds thus allow- 
ing the use of small, inexpensive, 
low power tracking motors. This ar- 
ticle describes how a dedicated 
microcomputer is configured. 

The System Hardware 

The system could reside on a one 
chip micro but is currently made up 
of a KIM-1, a Memory Plus and an in- 
house interface board. The interface 
board has a 16 channel 8-bit A/D 
converter (see Joe William's article 
in MICRO 12:25) and digital I/O 
drivers and logic. The Memory Plus 



provides I/O lines, sockets 
EPROM and RAM for data. 



for 



Another KIM and Memory Plus 
with an EPROM version of the 
MicroADE assembler are connected 
to a Teletype 43 for program 
development, testing and EPROM 
programing. Assembled programs 
are easily tested in RAM since the 
development system is almost iden- 
tical to the control system. Source 
programs are stored on cassette 
tape for revisions. 

The Implementation 

The control program is made of 
modules of code in EPROM and 




Figure 1 
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uses the non-maskable interrupt. It 
consists of two parts: the part that 
controls the position of the solar 
collector is the interrupt routine; the 
main loop part provides for other 
uses of the computer and interac- 
tively monitors the collector and/or 
the computer. 

Interrupt Service 

The non-maskable interrupt(NMI) 
is wired to the timer in one of the 
KIM 6530 chips. Every V* second, 
when the timer times out, the inter- 
rupt service routine is executed. See 
figure 2. This routine is made of 
modular sections, each of which 
performs some function. The first 
section of the NMI routine is a 
clock. This section fine tunes the V* 
second interrupt and keeps track of 
days as well as hours, minutes and 
seconds. 

One of the NMI routine sections 
performs the A/D conversions as 
well as the I/O functions of sensing 
the sun and turning on and off 
motors and indicators. Another sec- 
tion actually makes the control deci- 
sions which the I/O section carries 
out. 

All the sections are in EPROM 
and end with a 'Jump Indirect' in- 
struction. This instruction solves 
the first problem mentioned above, 
that of inflexible dedicated con- 
trollers. The difficulty is overcome 
because the RAM zero page 
pointers used by the jump indirect 
instruction can point to any other 
function module to be included in 
the routine. Each section ends with 
a jump indirect pointing to the next 
section and so on, until the last sec- 



c 


NMI ) 




Real 


time clock 


pother 


functions 


Input 


/ Output 




Contro 


. decisions 


1 


c 


RTI ) 



Non -Maskable 

Interrupt 

Routine 



Figure 2 



tion points to the code that restores 
the x, y and p registers and performs 
a 'Return from Interrupt'(RTI). 

Main Loop 

The main loop program (see figure 
3.) is constructed in a way which 
solves the second problem, that of 
tying up the whole computer with 
just the control functions. The key 
to solving the problem is a keyboard 
monitor which allows other 
unrelated functions to be time- 
shared with the control functions. 
The keyboard monitor can select for 
display any of the A/D channels, the 
solar collector position, or the time 
of day. In addition, one of the unus- 
ed analog inputs can be connected 
and monitored to use the microcom- 
puter as a digital voltmeter. 



The keyboard monitor can also 
select a jump to the KIM monitor. 
The KIM monitor can be used to 



Initialize 



MAIN LOOP 



Keyboard 
Monitor 



Function 
Display 



Kin Monitor 

and/or 

programs 



Figure 3 



enter or look at data or programs 
and even run other unrelated pro- 
grams (including programs that use 
the IRQ, the maskable interrupt) 
while the dedicated controller is us- 
ing the NMI and controlling the 
solar collector. 

Cautions 

There are minor hazards con- 
nected with having a flexible, time- 
shared dedicated controller. For ex- 
ample, a problem can occur when a 
program running on the system 
crashes, because, of course, 
pushing 'reset' stops the NMI clock 
timer. However, stopping the clock 
is not too serious a problem 
because with a warm restart of the 
control main loop, the clock will on- 
ly lose a couple seconds, and it can 
be corrected at any time. 

The warm restart is an important 
part of the initialization of the pro- 
gram. The original initialization sets 
up the NMI vector, the initial 
choices for the jump indirect 
pointers, the I/O ports and also 
starts the clock timer. By setting up 
the I/O and starting the timer at the 
end of the initialization a warm 
restart here will not change things 
like the time of the date or the jump 
indirect pointers that were correct 
before reset was pushed. 

Conclusion 

It is possible to program a 
dedicated controller which not only 
is flexible in what it does but, 
through time-sharing, can be used 
for other functions ( and even act as 
a digital voltmeter ) while it is perfor- 
ming as a dedicated controller. 



Attention 

BARGAIN HUNTERS 

Receive Hundreds of Classified Ads 
Like These Every Month 



HARD DISK DRIVE Diablo Mod 31 
1.2 MByte std. density. Includes 
power supp. and cable, rack mount 
slides, amd manual. Excellent 
condition. $4503*^ "**r}^ 
Wks^J^~ C«s CPS Serial V» 

mechanism^j^gat,^*^ 
^fHEATHKIT H-11/DEC LSI-11 
I, I system, 32K Byte storage, reader 1 
VcrJ punch, video terminal, complete 
' software. Cost $4500 assembled, 
$3500 kit. Like new. Sell for $2250. 
305-962-6677. 2058 Criftin Rd„ Ft. 
Lauderdale, FL 33312 



7 F / 16 M LE: lnt l rdata (Perkin -E'mer) 
7/16 Mini with 32KB core, front 

mt \ PWR supplv ,nc '"d« 

HS tape reader, interfaces for LP, 2 
(TTY), and RS-232 (Full duplex 
programmable), deludes manual; 

,3 ^C^mR^^MAT.ON ALPHA! 

16 . 16 k-word core memory.RM- 
S'-R Modified Mod. ASR-33 TTY' 
Manuals, utilities, j assem ,le» am 
many option boards - 16 bit I/O 
Snver, 16 bit I/O, Asynch modem 
contr 64 bit output, 10 bit A/U 
DM. Fairly complete documen- 
tation. Up and running In ^Fortran. 
Not much more than TTY at $10UU 
Herb Sauer, 303-494-8724. 



FOR SALE: Heath H9 video ter- 
minal excellent condition, $175 or 
, best offer. You ship. [214] 962-4484 

w ^E^r^r^~c7o^l^ 

r m h emor V board without memory 

chips and Phi deck controller board 
(k't A _ v a»embledor not working) M 

gO Dua/ F/opp^^^'er $80o . 

n than & TRS-flf 1 w- . * "ore 
gBW cassette °?' s c ^ H 100 



COMPUTER SHOPPER, the new buy, sell, and trade 
publication, is ready to help you with the latest inlor- 
mation on personal, small business and large-system 
computers, accessories and software. 

Each ad-packed issue is lull ot bargains you are 
looking for. Included are ads from individuals 
throughout the United States who are selling their 
good, pre-owned equipment just so they can trade-up 
to new equipment coming on the market. 

But, COMPUTER SHOPPER'S bargains won't be 
yours unless you subscribe. This useful, money- 
saving publication can become your way to com- 
municate with other buyers, sellers, and traders all over the nation. 

Whether you are a hobbyist or a part-time user, COMPUTER 
SHOPPER will put you in touch with the nationwide computer 
marketplace in time lor you to take advantage ot bargain oppor- 
tunities. 

Have something to sell? A COMPUTER SHOPPER subscriber pro- 
bably wants to buy It. 

Looking for a part, component or even a complete system? A 
COMPUTER SHOPPER subscriber probably wants to sell it. 

COMPUTER SHOPPER is THE marketplace for anything in com- 
puters and is read by thousands of people who are ready to buy. 

COMPUTER SHOPPER oflers a unique tormat in which classified 
ads are categorized for fast location of specific items. Combining 
this with low individual ad rates — 10 cents a word — 




makes it the ideal place for buyers and sellers to com- 
municate. And, its mix of individual, dealer, and 
manufacturer ads enable subscribers to find what 
they want at the best price possible. 

COMPUTER SHOPPER will work tor you in other 
ways, too If you are just thinking about getting into 
computers, it can help you learn product availability 
and prices before you make a decision. And. through 
the timely ads, COMPUTER SHOPPER will keep you 
abreast of changes in the market which could create 
bargain opportunities for you. 

BUT COMPUTER SHOPPER cannot work for you unless you 
subscribe. 

Want to look us over first? We'll give you your first issue FREE 
and then bill you for the next 12. If you are not convinced COM- 
PUTER SHOPPER suits your needs, just write "cancel" on the in- 
voice and return it. 

And, to let COMPUTER SHOPPER start working for you right now, 
with a paid subscription we'll also give you a FREE classified ad to 
sell your pre-owned equipment or to find equipment you want. 

It you don't need to use the tree classified ad now, use it anytime 
during your subscription. 

Subscription: $10/year, 12 issues plus your first free one. Bank 
cards accepted. Money back guarantee. 



The Nationwide Marketplace lor Computer Equipment 

COmPUTBR SMlJPPSR 

P.O. Box F22 • Tilusville, Florida 32780 
Telephone 305-269-321 1 



MasterCharge or VISA orders only, call TOLL FREE 800-327-9920. 



A "Stop-On-Address" Routine for KIM 



This very useful subroutine allows the user to debug 
more efficiently through the use of a trap, which will 
stop on a specified address. 



R. MacDonald 

45 Charles Tupper Drive 

Westhili, Ontario 

M1C2A8 



In the midst of debugging 
machine code for the KIM-1, it is this 
author's common practice to insert 
jumps to the monitor or breaks at 
strategic points in the program, and 
then start execution from the begin- 
ning. This is usually quite useful for 
tracing through a program to see 
what has happened to the output 
that was supposed to appear. There 
are two main problems with this 
technique however: 

1. You have to write down the 
contents of where you are 
placing the breakpoint and 
then return the contents 
later. 

2. The method is not usable 
for investigating a ROM or 
PROM. 

A Solution 

One means of getting around 
these difficulties is to use a tracer 
program. This can be accomplished 
quite easily by using a hardware 
timer, operating in the interrupt 
mode (eg. ref. 1), to cause an inter- 
rupt during every instruction until a 
specified end address is reached. 
For KIM this is simple, since one 
need only duplicate the monitor's 
single-step routine (to handle the in- 
terrupts) with the addition of setting 
up the timer to interrupt during 
every instruction. 

The Program 

The program (listing 1) uses the 
KIM monitor page zero locations to 
save all registers. This allows you to 
single step from the selected ad- 
dress once the routine has 
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operated. Register contents are in- 
spected in the same manner as 
single step operation. As usual, 
pushing PC returns the next address 
to be executed. 

To use the program do the follow- 
ing: 

1. Set the vector for single 
step operation. 

2. Set up POL, PCH with the 
FIRST ADDRESS to be ex- 



3. 



4. 



ecuted (this is not 

necessary following single 

step operation). 

Place the END ADDRESS 

at ENDL ($1780) and ENDH 

($1781). 

Execute from START 
($1782). 



The program stops on the 
selected address (before executing 
it). 



0010 










STOP ON ADDRESS FCR 


Klh 


0020 










RICK KACEGNALD 




0030 


















0040 


17DC 








PCL 


* 


S00EF 


Klh >.CMTCk PAGE ZERO 


0050 


17CC 








PCh 


* 


500F0 


EQUATES 


0060 


17DC 








FREG 


* 


S00F1 




0070 


17Dc 








SFUSER 


* 


S00F2 




OObO 


17DC 








ACC 


* 


$00F3 




00*0 


17DC 








YREG 


* 


$00F4 




0100 


17DC 








XREG 


* 


SO0F5 




0110 


17DC 








PCINTL 


* 


S00FA 




0120 


I7DC 








PGiMh 


* 


S00F6 




0130 


















0140 


17DC 








TIMCLR 


* 


51704 


STOP TIKER ADDRESS 


0150 


1/DC 








IlhSET 


* 


S170G 


START TL V .ER ADDRESS 


0160 


















0170 


1760 










GRG 


$1760 




0160 


















0190 


1760 


00 






ENDL 


» 


$00 


STORAGE FGR END ADDRESS 


0200 


1761 


00 






ENDH 


• 


$00 




0210 


















0220 


1762 


A9 


A2 




START 


LDALh 


IRC; 


SETUP IRQ VECTOR 


0230 


1764 


6b 


FE 


17 




STA 


$i7FE 




0240 


1767 


AS 


17 






LDAIM 


IRQ 


/ hIGh ADDRESS 


0250 


1769 


6D 


ft 


17 




STA 


$17FF 




0260 


" 
















0270 


176C 


A6 


F2 




AGAIN 


LDXZ 


SFUSER 


LGAD STACK FO INTER 


0260 


176E 


9A 








TXS 






0290 


176F 


A6 


F5 






LDXZ 


XREG 


LOAD X 


0300 


1791 


A4 


F4 






LDYZ 


YREG 


LOAD V 


0310 


1793 


56 








CLI 




ENAbLE IRQ 


0320 


1/94 


AS 


II 






LDAIh 


$11 


SET Tl.\ER TO INTERRUPT 


0330 


l/9b 


6D 


OC 


17 




STA 


I1MSET 


IN 17. CYCLES 


0340 


1799 


A5 


CI 






LCAZ 


PREG 


LGAD STATUS 




MICRC 


~ 
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For executing through a loop a 
number of times, pick an address in 
the loop to stop on and initialize 
LOOP (at $17DB) to the number of 
times through the loop required. 

Notes 

1. The single step switch 
must be off! 

2. PB7 must be connected to 
IRQ. 

3. The program fits quite nice- 
ly in the KIM ROM scratch- 
pad area but is fully 
relocatable. 

4. The routine is easily 
modified to stop on any 
register or memory location 
equal to a given value. Just 
replace "conditions 1 and 
2" in the program with the 
appropriate test logic. 

References 

1. Larry Fish, Kilobaud #8, August 
1977, p. 112. "Troubleshoot Your 
Software" A trace program for a TIM 
based 6502 system. 



2. KIM-1 User Manual, 
Technology. 



MOS 



0350 


179E 


4b 






0J60 


179C 


a5 


13 




0J70 


17VE 


2b 






0360 


179E 


6C 


EF 


00 


03S0 










0400 


17A2 


e5 


F3 




0410 


17A4 


6b 






04.20 


17A5 


65 


El 




04 JO 


17A7 


ofc 






0440 


17A6 


65 


EF 




0450 


17AA 


b5 


FA 




04 oO 


17AC 


6b 






0470 


17AC 


b5 


F0 




04b0 


1/AF 


t>5 


Fb 




0490 


17BI 


64 


F4 




0500 


17B3 


66 


F5 




0510 


1765 


bA 






0520 


17b6 


6b 


F2 




05.10 


17bb 


bD 


04 


17 


0540 


17bl 


AD 


60 


17 


0550 


17BE 


EA 






0560 


17Bf 


C5 


EF 




0570 


17C1 


DO 


CS 




05fc0 


17C3 


AD 


61 


17 


0590 


17C6 


EA 






0600 


17C7 


C5 


F0 




0610 


17C9 


CO 


CI 




0620 


17Cb 


AC 


Lb 


17 


0630 


17CL 


DO 


03 




0640 


17L0 


4C 


16 


1C 


0650 










0660 


171/3 


CE 


Db 


17 


0670 


17D6 


DO 


b4 




0660 


17Dt 


4X 


16 


1C 


06S-0 










0700 


17DB 


00 






0710 










0720 










ID- 











IRC. 



PKA 




PUT IK STACK 


LDAi. 


ACC 


GET ACCLt-i'JLATGR 


PLP 




GET STATUS 


JHl 


PCL 


EXECLTE ICSTRCCTICK- 


STA2. 


ACC 


ThlS IS ThE SA.SF. AS 


PLA 




ThE KIM hCMTOR AT SI 000 


STAZ 


FREG 




PLA 






STAZ 


PCL 




STAZ 


POISTL 




PLA 






STAZ 


PCH 




STAZ 


PC 1 NTH 




STYZ 


YREO 




STXZ 


XREG 




TSX 






STXZ 


SPL'SER 




STA 


TIM.LR 


STOP TthER 


LDA 


EKDL 


CCKD1T10N 1 


KOP 






CfcPZ 


PCL 




BKE 


AGA1K 




LDA 


EKDh 


CONDITIOK 2 


NOP 






CHPZ 


PCh 




BKE 


ACA1K 




LDA 


LOOP 




BKE 


SKIP 




JhP 


$1C16 


TO K1K IF ADDRESS AND KO LOOP 


DEC 


LOOP 




BNE 


AGA1K 




JhP 


SIC16 





SKIP 



LOOP - S00 00 CR 01 TO EXECUTE ONCE 

02 Ok MORE TO EXECLTE ThAT KUMEER OP TIKES 



32 K BYTE MEMORY 

RELIABLE AND COST EFFECTIVE RAM FOR 

6502 & 6800 BASED MICROCOMPUTERS 

AIM 65-*KIM*SYM 

PETS44-BUS 



• PLUG COMPATIBLE WITH THE AIM-65/SYM EXPANSION 
CONNECTOR 'BY USING A RIGHT ANGLE CONNECTOR 
(SUPPLIED) MOUNTED ON THE BACK OF THE MEMORY 
BOARD 

. MEMORY BOARD EDGE CONNECTOR PLUGS INTO THE 
6600 S 44 BUS 

• CONNECTS TO PET OR KIM USING AN ADAPTOR CABLE 

• RELIABLE— DYNAMIC RAM WITH ON BOARD INVISIBLE 
REFRESH-LOOKS LIKE STATIC MEMORY BUT AT 
LOWER COST AND A FRACTION OF THE POWER 
REQUIRED FOR STATIC BOAROS. 

• USES -5V ONLY. SUPPLIED FROM HOST COMPUTER 

• FULL DOCUMENTATION ASSEMBLED AND TESTED 
BOARDS ARE GUARANTEED FOR ONE YEAR AND 
PURCHASE PRICE IS FULLY REFUNDABLE IF BOARD IS 
RETURNEO UNOAMAGEO WITHIN 14 DAYS. 

ASSEM8LE0 WITH 32K RAM J4I9.00 

i WITH 16K RAM J349.00 

TESTED WITHOUT RAM CHIPS 1279.00 

HARD TO GET PARTS (NO RAM CHIPS) 

WITH BOARD AND MANUAL JIO9.00 

BARE BOARD & MANUAL M9.00 



PET INTERFACE KIT-CONNECTS THE 32K RAM BOARD TO 
A 4K OR 8K PET CONTAINS INTERFACE CABLE. BOARO 
STANDOFFS POWER SUPPLY MODIFICATION KIT AND 
COMPLETE INSTRUCTIONS $49.00 



:^^ss^"s>£»n,'i>vi> ? ^*i 1 



S^3^S^S° 






-Isl 



T^^mKmreSlli 



7r> 



16K MEMORY 
EXPANSION KIT 



ONLY 



$58 



FOR APPLE, TRS-80 KEYBOARD. 
EXIDY, AND ALL OTHER 16K 
DYNAMIC SYSTEMS USING 
MK4116-3 OR EQUIVALENT 
DEVICES. 

* 200 NSEC ACCESS. 375 NSEC 
CYCLE 

* BURNED-IN AND FULLY 
TESTED 

* 1 YR. PARTS REPLACEMENT 
GUARANTEE 

* OTY. DISCOUNTS AVAILABLE 



U.S. PRICES ONLY 



II "I 



ALL ASSEMBLED BOARDS AND 
MEMORY CHIPS CARRY A FULL ONE 
YEAR REPLACEMENT WARRANTY 



COmPUTER DEVICES 

1230 UJ.COLLins AVE. 

ORflDGE. Cfl 92668 

(714)633 7280 

Call), residents please add 6 : sales lax Masterc 
sepled. Please allow 14 days lor ehei 

— ':oiti* Shipping ch_ .. 



Tiny Pilot Complemental (Co-Pilot) 



A modification to Tiny Pilot which improves the "Match" 
statement. 



Robert Schultz 
231 West Duvall Street 
Philadelphia, PA 19144 



As soon as I installed the first 4K 
additional memory in my KIM, I 
figured that the time was right to try 
my hand at programming in 
something other than assembly 
language. The Tiny Pilot interpreter, 
written by Nicholas Vrtis, that ap- 
peared in MICRO, September 1979 
(16:41), looked good. It is written for 
the SYM, but Bob Applegate's sug- 
gestions in MICRO, Feburary 
1980 (21:41), helped me get it run- 
ning on my system. 

It is a fun language! But, to my 
disappointment, I discovered that 
the "Match" statement would only 
match the first word input into the 
accept field. For example, I was try- 
ing to get the program to match if 
the word "wrong" were typed by the 
person using the program. If he or 
she typed "wrong" it would match, 
but if "you are wrong" were typed, it 
wouldn't match. 

I made a modification to the Tiny 
Pilot interpreter to remedy this 
shortcoming. This modification fits 
in the space in KIM's upper RAM 
right behind Applegate's I/O 
routines. 

Here's how it works. The inter- 
preter enters the old "Match" 
routine. If a match is made, fine, the 
interpreter goes on to the next 
routine. If no match is found, the 
modifications prevent the old 
"Match" routine from giving up that 
easily. 

The modification routine looks for 
the first ASCII "space" in the accept 



0010: 










TINY PILOT 


hCblElCATICN 


0020: 










KCbEKT 


bChULTL 




00 JO: 


















0040: 










"CO-PILGI" 






0050: 


















0060: 


17L5 








FLG 


* 


S0002 




0070: 


17D5 








NCkAD 


* 


S009A 




0060: 


17D5 








&inxh 


* 


SIEA0 


Klh OUTPUT ChARACTF.K 


0090: 


17D5 








GETCh 


* 


blE5A 


Klh INPUT CHARACTER 


0100: 


17&5 








CRLF 


* 


SIE2F 


Klh CAkRIAGE RETURN/LINEFEED 


0110: 


0353 










ORG 


S0353 


TIE IN TO EXISTING FRoCkAM 


0120: 


















0130s 


0353 


4L 


BC 


17 




JhP 


S17EC 


ChANCE FUNCTION CF JUMP 


0140: 


0j56 


4C 


Ab 


17 




JhP 


S17A6 


JMP TO KIM UPPER kAK ON "F." 


0150: 


















0160: 


033C 










CRC 


SO 35C 




0170: 


035C 


A6 


5a 






LDX 


NGKAD 


CHANGE LOADING INST TO NCRAl) 


0160: 


















0190: 


036C 










CRC 


$0360 




0200: 


036c 


L0 


E5 






bNE 


$0553 




0210: 


















0220: 


03A3 










CKG 


S03A3 




02j0: 


03AJ 


40 


b3 


17 




jt.p 


S17b5 


JF.P TO bEGlNMNG GF NEW LOOP 


0240: 


















0250: 


1/fcO 










CRO 


$1760 


REGISTER PRESEkVEk 


0260: 


















0270: 


1760 


00 






XSAVE 


" 


$oo 




0260: 


1761 


00 






YbAVE 


» 


$00 




0290: 


















0300: 










bYM GUTChR 


- SAVCL'T 




0310: 


















0320: 


1762 


6C 


bl 


1/ 


SAVGUT 


bIY 


YSAVE 


SAVE Y 


OjjO: 


1765 


20 


A0 


IE 




JSR 


GUTCh 


PRINT "A" 


0340: 


1/66 


AC 


bl 


17 




LLY 


YbAVE 


Kfc STOKE Y 


0350: 


17bb 


60 








RTS 




RETURN 


0360: 


















0370: 










SUM INChR = 


SAVIN 




03b0: 


















0390: 


176C 


6C 


bl 


17 


SAVIN 


STY 


YbAVE 


SAVE Y 


0400: 


l/6t 


20 


5A 


IE 




jSR 


LETCfa 


GET ASCII ChAR 


0410: 


1/92 


AC 


61 


17 




LLY 


YbAVE 


RESTORE Y 


0423: 


1795 


60 








Rib 




RETURN 


04 30: 


















0440: 










&YF; CR; 


U ■ 


SAlcX 




0450: 


















0460: 


1/96 


6C 


bl 


1/ 


bAVCk 


STY 


YSAVE 


SAVE Y 


04/0; 


1/99 


6E 


60 


17 




STX 


XSAVE 


SAVE X 
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field. When it finds one, it makes the 
next character in the accept field in- 
to the first character of a new 
search. 

If the "Match" routine doesn't 
find a match during this search, it 
looks for the next ASCII "space", 
and the search begins anew. When 
the modification routine discovers 
that the next possible accept field 
start position is the last position in 
the accept field, it calls it quits, 
declares no match, and goes on to 
the the next routine in the inter- 
preter. 

The following is a listing of my 
modification routine. The address 
locations that begin with "03" 
replace listings in Mr. Vrtis' pro- 
gram. They jump Tiny Pilot to the 
new routine in KIM's upper RAM. 
This new routine goes from 17A6 to 
17D4. I've also supplied listings of 
the I/O routines suggested by Bob 
Applegate. They go from 1780 to 
17A5. 

I'd like to thank Mr. Vrtis for pro- 
viding us with such a fun language 
in Tiny Pilot. I hope soon to be able 
to supply intriguing programs in 
Tiny Pilot. 



OAtO: 
OASO: 

0500: 
0510: 
05^0: 
05 JO: 
0540: 
0550: 
0560: 
0570: 
05fc0: 
05W: 
0600: 
0610: 
0620: 
06j0: 
06^.0: 
0650: 
0660: 
0670: 
ObfcO: 
0690: 
0/00: 
0710: 
0720: 
0730: 
0740: 
0750: 
0760: 
0770: 
0760: 
0750: 
OfcOO: 
OtlO: 
0c20: 
OfcjO: 
0640: 
It- 



175C 20 2F IE 

17VS AC ol 17 

17A2 AE 60 17 
17A5 60 



17A6 05 40 
17Afa CO 07 
1/AA Ai 27 
17AC 66 5A 
17AE 40 5A 03 
1761 40 Ay 03 
1764 EA 



l7B5 A6 5A 
1767 0A 
1766 L0 07 
17DA A2 4E 
1760 £6 02 
176E 40 79 02 

1 701 B5 03 
17CJ C5 20 
1705 fO 02 
1707 00 EE 
1709 0A 
170A A0 27 
1/C0 64 6D 
170E A0 02 
17D0 66 5A 
17D2 40 5A 03 



JSh LsLF GUTtL'T C5LF 

LDY YbAVE RESTORE \ 

LDX XSAVE KEbTOKE X 

RIS kETL'KN 

INITIAL UK FOR NEV. LOOF 



fr.IEST OKfrlh S4D 

bNE NOTh 

LDXlh ill 

STX NOkAI) 

JhB i0J5A 

MjTM JfcP S0JA9 
NOP 



TEbT "B" 



LOAD X WITH BUFFER OFFSET 

JhP TO EEOUNN1NO OF LOOP 
JhE IO NEXT FUNCTION 



DETERMINE IF ALL WORDS IN bOTFER hAVE bEEN 
EXAMINED. IF NOT, hEbET bUFFER POlNIEk TO 
NEXT VOrD 

NLOOP LDX NOKAD LOAD bL'FFER FO INTER 



NNLOOP DEX 

bNE 6L0OP 
LDXIM S4E 
bTX FLG 
JhP S0279 



ELOOP 



OLOOP 



LDAiX 603 

CMP1M 620 

BEQ OLOCP 

BNE NNLOOP 
DEX 

LDY1M $27 

STY S006D 

LDY1F. S02 

bTX NOKAD 

JhP $0j5a 



NEXT bL'FFER POSITION 

NO, SO LOAD N IN X 
blORE IN FLG 
NEXT ROUTINE 

LOAD A FhOh BUFFEk 
TEST bPAOE 
BRANCH IF SPACE 

NEXT CHARACTER 

FIRST BUFFER POSITION 

STOKE INDEX POINTER 

LOAD Y UlTh CORRECT CONTENT 

PUT NEW BUFFER SIAKT INTO NOkAD 

JU\r !0 BEGINNING OF NEW LOOP 







The Ortalnal Inexpansl 
paper GRAPHICS PA 



PA© for 



> 



ART 

ARCHITECTURE 

BUSINESS 

DISPLAY 

DESIGN 

EDUCATION 

LAYOUT 

GRAPHS 

SCIENCE 

STATISTICS 

ELECTRONICS 

TECHNICAL 

TRAINING 

...AND FUN! 



T.H. 
TEXT / LO-flES PAD 

Formats either the TEXT or LOflES 
•own. "FWrturw AUTOMATIC TEXT . 
CENTERING. 

HMtESPAD 
HI-WES screens without expensive 
Graphics TeWet Includes most-vised 
Graphics commands. 
TRUE screen proportions ... NOT 
Just orsph paper. EXCELLENT for 
precision applications. 

EASY TO USE 
Effective even mt the elementary 
school level. 

Simple HPLOT statements made 
these pictures .. . 





GRAPPLE PADS: 
$3.00 per SO •hast pad 

DEALER INQUIRIES INVITED 

Distributed by. 



Available at your local 
dealer ... Aak to »a« the 
Demonstration Software 

ANOTHER CREATION 

FROM 3740 Colony Drive 

San Antonio, Texa* 78230 

<si2)«o-ioir 

VkPf«lllaareoWer©dTRADEMAflKoiApi»leCpmp^Co 

•BELL & HOWELL MICROCOMPUTER la a registered TRADEMARK of 

BELL & HOWELL, INC. 

•GRAPPLE Is a TRADEMARK o» SOLUTIONS. INC. 



A 



SUPER 



EXPANSION 



BOARD 



WE'VE COT AN EXPANSION BOARD THAT WILL TURN YOUR 
SUPER80ARD/CIP INTO A REAL SUPER COMPUTER. JUST 
LOOK AT SOME OF THE FEATURES: 

REAL COLOR GRAPHICS 

* Twelve software selectable display modes-Eour 
alphanumeric and eight graphic display nodes, 
including 64X64. 128X64, 128X196, 128X192 or 
256X192 densities. 

* Up to eight user selectable colors. 

* One display mode offers 49,152 individually 
addressable points. 

* Up to 6K display RAH (located in unused memory 
area) . 

* Connects directly to Color or B/W TV, no 
modulator required. 



* Up to 16K expansion RAH. 

* 8 bit parallel port w/handshake. 

* Serial port (pa ra 1 lcl-to-ser ia 1 /serl al -to- 
parallel shift register). 

* Two 16 bit timers/counters. 

* Full documentation package ( inc ludes-schema t ic , 
parts list, mounting instructions, data sheets, 
sample programs and more). 

The SEB requires no tnodif I ca t ion to the SB11/C1P, 
it has the same physical dimensions and mounting 
configuration as the 610 board. 



Assembled expansion bo 
and 4K user RAH. 



rd with IK display RAM 



SEB-0 
Bare h 



GRAFIX 

91 1 COLUMBIA AVE. 

N. BERGEN, N.J. 07047 

201-330-1898 

Phone hours: Tues-Fri 12-9, Sat 10-6. 

N.J. residents 
add 5Z sales tax. 
Superboard/ClP are trademarks of Ohio Scientific, Inc. 



MICRO Club Circuit 



Here is another listing of club in- 
formation. The response to this 
feature has been great. Keep them 
coming! A club-special reprint offer 
is made below. 

MICRO ATTENDS THE APPLE FAIR 

The APPLE FAIR was held on 
August 16th at NYU Tisch Hall. 
Eight sponsoring clubs gathered 
together to present seminars and 
exhibitions for over 800 people in at- 
tendance. Each club contributed a 
disk to exhibit from its own library. 
This proved to be a very popular 
feature. Many of these clubs had 
never worked together before and 
were pleased to find their combined 
efforts produced an exciting event. 

Seminars were held all day and 
were well attended to the very last. 
MICRO'S Software Consultant, Ford 
Cavallari, gave a presentation on 
"The APPLE in Education." Fair 
Organizer, Bruce Brewster, com- 
mented that the idea of a unified ef- 
fort for such an event, which brings 
many clubs together, has great 
merit. He expressed his hopes for 
more events similar to this in the 
future. 

More than 10 dealers were pre- 
sent, along with MICRO. Our obser- 
vations are that this was one of the 
best fairs ever run and was well 
worth the journey. We hope that 
others initiate similar events. 

The Sponsoring Clubs for this AP- 
PLE Fair were: 

BIG APPLE USERS' GROUP 

APPLE POWER 

N.J. APPLE USERS' GROUP 

PHILADELPHIA AREA USERS' GROUP 

APPLESHARE 

APPLELIST 

NEW ENGLAND APPLE TREE 

and 

WASHINGTON APPLE PI 

MICRO distributed reprints of Pro- 
fessor William F. Luebbert's 
"What's Where in the APPLE." 
MICRO now offers them to any of- 
ficially registered club. Simply have 



your secretary notify us and we will 
send you a quantity of these 
reprints. 

If your club is not registered, why 
isn't it? Send for our registration 
form and indicate the amount of 
reprints you would like. We have on 
hand only a limited amount of this 
fine article, so be sure to have your 
secretary respond quickly! 



OMEGA 

OSI Microcomputer Enthusiasts 

Group — Australia 

Because these members are spread 
all over Australia this club does not 
have regular meeting times. 
However, small groups of members 
in each city will often meet at each 
other's homes on an informal basis. 
OMEGA functions as a Hardware 
and Software Exchange, and 
publishes a bimonthly Newsletter. 
Membership is currently at 50, with 
3-4 new members each month. For 
more information, contact: 

Geoff Cohen 

72 Spofforth Street 

Holt 

A.C.T., 2615 

Australia 

The Ann Arbor Apple 

Meets every third Thursday of the 
month. Starting time is 7:00 p.m. at 
NCE/Compumart (1250 N. Main 
Street, Ann Arbor). Formed in 
January of 1980, this club now has a 
group of 80 members. Contact: 
The Ann Arbor Apple 
P.O.Box M-1047 
Ann Arbor, Ml 48106 
"Formed so that Apple users could 
see some of the Hardware and Soft- 
ware available at meetings. Our 
main asset is our monthly, 22 page 
Newsletter. Dues are $12.00 per year 
and include free copying of club 
disks or discount by mail. " 



OKC Atari User Group 

Meets once a month on announced 
dates (at previous meeting) at 7:30 
p.m. at High Technology Computer 
Store (1611 N.W. 23rd Street). Terry 
Barker is club President for about 10 
members, so far. For further infor- 
mation, contact: 

Terry Barker 

First National Bank 

Box 25189 

Oklahoma City, OK 73125 
"To further understanding of the 
Atari." 

Apple Sauce of Omaha 

Meets on the last Wednesday of 
each month at 7:30 p.m. at the 
Engineering Building on the Univer- 
sity of Nebraska Campus in Omaha. 
This group was formed in January of 
1980 and has grown to over 40 
members. Contact: 

John Anderson 
3701 McKinley 4B 
Omaha, Nebraska 68112 
"Our goal is to provide members 
with information about the Apple 
Computer, available software, and a 
forum to share member's 
knowledge of the Apple." 

Updates— Updates— Updates 

Santa Barbara Apple User Group 

Address change for this club: 

2007 State Street 

Santa Barbara, CA 93105 
Meets on the 1st Wednesday of the 
month at 7:30 p.m. at The Computer 
Shop (2007 State Street, Santa Bar- 
bara, CA). Correspondence should 
be addressed to: 

Secretary 

2031 De La Vina 

Santa Barbara, CA 93105 

New England Apple Tree 

The zip code for the post office box 
as listed in MICRO 25:69 should be 
01801. The Club's new president is 
Lori Steinmetz. 
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I 

Increase 

your PETs IQ 



Speed up your PET programming with The BASIC 
Programmer's Toolkit™ now only $39.95. 

Don't waste valuable programming time if there's an 
easier way to go. Here it is: The BASIC Programmer's 
Toolkit, created by the Palo Alto ICs, 
a division of Nestar. The Toolkit is 
a set of super programming aids 
designed to enhance the writing, 
debugging and polishing of BASIC 
programs for the PET. 

The BASIC Program- 
mer's Toolkit has two 
kilobytes of ROM firm- 
ware on a single chip. 
This extra ROM store lets you avoid 
loading tapes or giving up valuable 
RAM storage. It plugs into a socket 
inside your PET system, or is mount- 
ed on a circuit board attached on 
the side of your PET, depending on 
which PET model you own. 

There are basically two versions of 
PET. To determine which Toolkit you 
need, just turn on your PET. If you 
see***COMMODORE BASIC*** 
your PET uses the TK-80P Toolkit. 
If you see ###COMMODORE 
BASIC###, your PET uses the 
TK-160 Toolkit. Other versions of 
the BASIC Programmer's Toolkit 
are available for PET systems 
that have been upgraded 
with additional memory. 



How Toolkit makes your programming easier: 

FIND locates and displays the BASIC program lines 
that contain a specified string. If you were to type 
FIND AS, 100-500, your PETs screen would display all 
lines between line numbers 100 and 
500 that contain A$. 

RENUMBER renumberstheentire 
program currently in your PET. 
You can instantly change 
all line numbers and all 
references to those 
numbers. For instance, 
to start the line numbers 
with 500 instead of 100. 
just use RENUMBER 500. 

HELP is used when your program 
stops due to an error. Type HELP, 
and the line on which the error 
occurs will be shown. The erroneous 
portion of the line will be indicated 
in reverse video on the screen. 

These simple commands, and the other 
seven listed on the screen, take 
the drudge work out of program 
development work. And for a very 
low cost. The BASIC Program- 
mer's Toolkit costs as little as 
$39.95, or at the most, $59.95. 

Get the BASIC Programmer's 
Toolkit and find out how quick 
and easy program development 
can be. See your local PET 
dealer or send this coupon in 
today. 




Ci. commodore 



personal 

computer 



PMJ® ALT© ICs 

A Division of Nestar Systems. Incorporated 



PET™ is a trademark ol 
Commodore Business 
Machines. Inc The BASIC 
Programmer's Toolkit™ 
is a trademark ot Palo 
Alto ICs. a division ol 
Nestar Systems. Inc. 




The Toolkit is lully assembled 
II is not a kit and requires no 
special tools to install. 




I want to save 

programming 

time and money. 

Send me The BASIC Programmer's Toolkit that will give 

my PET 10 new and useful commands. 

Fill in the appropriate line below: 

Qty TK-160Toolkit(s) @ $39.95 

Qty TK-80P ToolkitCs] @ $59.95 

Quantity discounts available to qualified dealers. Want to 
charge it? Call (415) 493-TOOL, or fill out the form below. 

Enclosed is a D money order □ check 

(If charging): □ Bill VISA □ Bill Master Card. 



Please include the amount of the Toolkit, plus $2.50 for 
shipping and handling. Please allow 4-6 weeks for delivery. 
SATISFACTION GUARANTEED, OR SEND IT BACK 
WITHIN 10 DAYS OF RECEIPT AND PALO ALTO ICs 
WILL REFUND YOUR MONEY. 

SEND TO: 



Name- 



Address- 
Cily 



-Slate- 



-Zip- 



Charge Card- 



-Exp. Dale- 



Phone 

MAIL TO: 



Master Card Interbank Number- 



Signature- 



Palo Alto ICs 

A Division of Nestar Systems, Inc. 

430 Sherman Avenue 

Palo Alto, CA 94306 

(415) 493-TOOL 



For Multiple File Tape Backups 



This PET utility takes the drudgery out of making 
multiple backup copies of cassette files. 



G.R. Boynton 

Dept. of Political Science 

University of Iowa 

Iowa City, IA 52242 



Always make a backup copy! That 
is good advice, and I followed it 
assiduously for a year. Then it 
became apparent that something 
had to give. I had over 100 original 
programs or data files on separate 
tapes; which meant that I had over 
100 backups. That made me one of 
the more regular customers of the 
store from which I buy tapes, and I 
had a very large sum of money tied 
up in tapes. In addition, my tapes 
were running me out of house and 
home. Something had to be done!! 

Aside from lethargy, what kept 
me from doing something about this 
situation was the recognition of 
how slowly the PET tape drive 
operates, and the amount of time i 
projected it would take to make 
multiple file backup tapes or to use 
them once they were constructed. 
But I remembered a couple of pro- 
grams that used fast forward to go 
skittering across the tape until the 
correct file was found so I dug them 
out and began to construct multiple 
file backup tapes. Everything was 
going fine until I had to save a pro- 
gram that took 2K of memory and 
one that took 11. 3K of memory. 
Because of the way the program 
worked that wasted a lot of space 
for the first program and was not big 
enough for the second. The prob- 
lem: a fixed amount of tape reserved 
for each program. That seemed a 
very unhandy way for a program to 
operate so I wrote this program call- 
ed TAPE BACKUP. 

TAPE BACKUP is designed to 
facilitate creating multiple file 



backup tapes. In order to do this ef- 
fectively you need a long tape; a 46 
minute or 60 minute tape will do. 
The first program saved on the tape 
is TAPE BACKUP. After TAPE 
BACKUP is loaded you are asked 
whether you want to use cassette 
#1or #2. Then a "table of contents" 
is displayed, and you are instructed 
to push F.FWD and then indicate 
the number of the file you want to 
access (or the location at which you 
wish to save a file). Once you in- 
dicate the file, the cassette fast for- 
wards to the appropriate place and 
stops. The operation is very simple, 
and F.FWD is fast, at least relative 
to PLAY. In addition, the program 
gives instructions on what has to be 
changed in the program when you 
add a file to the tape to bring it up to 
date, and it will even compute the 
number of jiffies required to fast for- 
ward over a program of a given size. 

Next I would like to describe the 
program and how it does what it 
does. Then I will suggest some sim- 
ple procedures for using the pro- 
gram. 

The program is designed to be 
quite flexible. It will run on 
machines with either the new or old 
PET BASIC ROMs, and it will permit 
using either cassette. The PEEK 
statement in line 90 determines 
whether it is the new or old ROM. 
The next few lines print an introduc- 
tion to the program and determine 
which cassette will be used. Lines 
180-195 define a variable "RO" 
which combine those two pieces of 
information, and this variable is us- 
ed later in three GOSUB statements. 



Lines 200 through 350 put the in- 
structions to push F.FWD and the 
table of contents on the screen. 

Lines 400 through 550 plus three 
subroutines and a data statement 
are the heart of the program. There 
are four tasks to be performed in 
this segment of the program. 

1. Stop the cassette. 

2. Ascertain the file to be accessed. 

3. Determine the number of jiffies 
needed to get to that file. 

4. Start the cassette; let it run the re- 
quired length of time; and then stop 
the cassette. 

Lines 400, 410, and 530 obtain the 
number of the file to be accessed. 
They constitute a loop which in- 
cludes the GOSUB statement in 420. 
Depending on "RO", which 
specifies the ROM and the cassette 
being used, statement 420 sends 
the program to a statement which 
does two things. It sets the tape 
drive to an "off" status, and it stops 
the operation of the appropriate 
cassette motor. For the old ROM, 
memory location 519 sets the status 
of the first tape and 520 sets the 
status of the second cassette. For 
the new ROM the comparable 
memory locations are 249 and 250. If 
52 is POKEd to 519 for the old ROM 
or 1 is POKEd to 249 for the new 
ROM this sets the status of tape 1 
as off. For tape 2 the memory loca- 
tion 520 must be POKEd 1 for the old 
ROM and 250 must be POKEd 1 for 
the new ROM. Memory location 
59411 is used for the first cassette 
motor in both old and new ROM's, 
and 59456 is used for the second 
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cassette motor. By POKing 61 for 
the first cassette or 223 for the sec- 
ond cassette, the motor is turned 
off. 

The third task is accomplished by 
lines 440 through 500. In 440 the file 
number is changed from a string 
variable to a number. This allows 
the for/next loop in 450 through 490 
to operate the appropriate number 
of times. Line 460 reads the Kth 
number on a data statement; the 
data statement is in line 888. Line 
470 adds the past value of J 
(represented by J1) to 150 (which is 
the jiffies needed for the leader) to 
the number of jiffies needed for the 
file. If one wants the fourth file the 
loop will operate four times. The 
first time it will add the past value of 
J (which is zero) to 150 (for the 
leader) to the number of jiffies for 
the first file. And it continues in this 
way through four iterations. Thus, 
the loop calculates the number of 
jiffies needed to reach the file to be 
accessed. 

The final task is fast forwarding 
to the appropriate place on the tape. 
This is done in lines 510 through 540 
and the associated subroutines. The 
subroutine in 1100 (or whichever of 
the four is appropriate) sets a value 
of TS which is the current value of Tl 
(the PET's clock) plus J. Then it 
starts the cassette motor. In 530 the 
value of Tl is compared to TS; as 
long as Tl is less than TS the 
cassette is fast forwarding. When Tl 
is no longer less than TS the 
subroutine shuttled to by line 540 
stops the cassette motor. 

From line 600 on the program 
gives instructions. After the 
cassette stops one can either ac- 
cess the file or save a new file. The 
program contains two features for 
assisting in creating a new file. 
First, it will remind the user about 
the changes that should be made in 
TAPE BACKUP when a new file is 
added. Then it will compute the jif- 
fies needed for a file of a given size. 
The user has to know how much 
memory is required for the program 
or the data set. This can be deter- 
mined using FRE(0) when the pro- 
gram is loaded or before and after a 
data file has been read by a pro- 
gram. 

Using the program is quite sim- 
ple. It works particularly smoothly 



190 
195 



10 P.EM *** TAPE BACKUP PROGRAM 

20 REM *** G. R. BOYMTOH 

30 REM *** DEPARTMENT OF POLITICAL SCIENCE 

40 REM *** UNIVERSITY OF IOWA 

50 REM *** IOWA CITY, IOWA 52242 

90 RM=PEEK( 50003) 

100 PRINT" [CLR] [DM] [DM] [DNl " ;TAB ( 10 ) ; "*** TAPE BACKUP ***" 

110 PRINT" [DM] (DID [DMlTHIS PROGRAM IS DESIGNED TO FACILITATE" 

120 PRIMT"CP.EATING MULTIPLE FILE TAPE BACKUPS." 

130 PRINT" [DM] IT CAM BE USED EITHER TO SAVE A FILE" 

140 PRIMT"AT A PARTICULAR SPOT ON THE TAPE OR TO" 

150 PRIHT"ACCESS A PROGRAM OR DATA SET QUICKLY." 

160 PRINT" [DM] tDN] [DM] DO YOU WANT TO USE TAPE SI OR TAPE S2?" 

170 PRINT" (DM! IRC) tRC) [RC] (RESPOND '1' OR '2') ";: INPUT TD 

180 IF RM=0 AND TD=1 THEM RO=l 

185 IF RM=0 AND TD=2 THEM RO=2 

IF RM=1 AND TD=1 THEN RO=3 

IF RM=1 AMD TD=2 THEN RO=4 
200 PRINT" (CLP.) IDM) [DN] [DN] PRESS F.FWD KEY ON CASSETTE TAPE HOW." 
210 PRINT" [DN] NEXT EMTER THE DESIGNATION FOR THE FILE" 
220 PRINT"TO BE SELECTED." 

230 PRINT" [DM] [ DM) THE FILES ON THIS TAPE ARE:" 
240 PRINT" [DN] N DATA FILES FROM CALENDAR" 

250 PRINT" " 

260 PRINT" [DN10. FIRST FILE" 

270 PRINT"1. SECOND FILE" 

280 PRINT"2. THIRD FILE" 

290 PRINT" 3." 

300 PRINT" 4." 

310 PRINT"5." 

320 PRINT"6." 

330 PRINT"7." 

340 PRINT"8." 

350 PRINT"9. TENTH FILE" 

400 N$="" 

410 GET NS 

420 ON RO GOSUB 1000,1010,1020,1030 

430 IF NS="" THEM GOTO 410 

440 N=ASC(LEFTS(NS,l))-43 

445 IF M=0 THEN 600 

450 FOR K=l TO H 

460 READ D(K) 

470 LET J=J1+150+D(K) 

480 le;t J1=J 

490 NEXT K 

500 RESTORE 

510 PRINT"SEARCIIIMG FOR FILE ";N 

520 ON RO GOSUB 1100,1110,1120,1130 

530 IF TKTS THEM 530 

540 ON RO GOSUB 1200,1210,1220,1230 

600 PRINT" [CLR] [DM] [DM] [DNlFILE ";M;" HAS BEEN FOUND." 

610 PRINT" [DM) PRESS 'STOP' ON THE CASSETTE." 

620 PRINT" [DNl MOW YOU MAY ACCESS THE FILE NORMALLY" 

630 PRINT" [DNl OR" 

640 PRINT" [DM] SAVE A NEW FILE ON THE TAPE AT" 

650 PRINT" [DN1THIS POINT. " 

660 PRINT" [DNl [DMl [DNl WOULD YOU LIKE INSTRUCTIONS FOR UPDATING" 

670 PRIHT"TI1IS PROGRAM WHEN ADDING A NEW FILE?" 

680 PRINT" [DM] ";: I'jrUT A$ 

690 IF AS="YES" THEN GOSUB 1300 

700 PRINT" [ Cl.Rl IDN] [DN] [DMl WOULD YOU LIKE TO COMPUTE THE NUMBER" 

710 PRINT"OF JIFFIES REQUIRED FOR THIS FILE?" 

720 PRINT" [DNl ";: INPUT A5 

730 IF AS = "YES" THE!! GOSUB 1400 

7 40 PRINT" [DNl THAT'S IT." 

750 END 

888 DATA 325,700,5 

1000 IF PEEK(519)=0 THEN POKE 519,52:POKE 59411 ,61 : RETURN 

1010 IF PEEK(520)=0 THEN POKE 520,1:POKE 59456 , 223 : RETURN 

1020 IF PEEK(249)=0 THEN POKE 249,52:POKE 59411 ,61 : RETURN 

1030 IF PCEK(250)=0 THEN POKE 250,1:POKE 59456 ,223 : RETURN 

1100 POKE 59411 ,53 :TS=TI+J: RETURN 

1110 POKE 59456, 207 :TS=TI+J rPETURN 

1120 POKE 59411, 53 :TS=TI+J : RETURN 

1130 POKE 59456, 207 :TS=TI+J : RETURN 

1200 POKE 59411, 61:RETURM 

1210 POKE 59456, 223: RETURN 

1220 POKE 59411, 61:RETURM 

1230 POKE 59456, 223: RETURN 

1300 PRINT" [Cl.Rl [Dill [DIM [DHlTWO PARTS OF THE PROGRAM SHOULD BE 

1310 PRINT"UPDATED." 

1320 PRINT" [DN1TI1C TABLE OF CONTENTS IN LINES 230" 

1330 PRINT"THROUGH 350 SHOULD BE CHANGED BY ADDING" 

13 40 PRIHT"TI!E NAME OF THE FILE ADDED. " 
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1350 PRINT" IDnlTHS DATA STATEMENT IN LIKE CSS SHOULD" 

1360 PRIHT"IIAVE THE NUMBER OF JIFFIES I>1 THE MEW" 

1370 PRINT"FIt.E ADDED TO IT." 

1380 PRINT" [lit! 1 ";: FOR K=l TO 22 : PRINT" [DHJ " ; .-NEXT K 

1385 PRINT"PRE.9S SPACE BAR TO CONTINUE" 

1390 GET AS:IF AS="" THEN 1390 

13 99 RETUr.N 

1400 PRINT" [CLFJ tDK] [DM] tDHlTHE SIUIiBER OF JIFFIES REOUIRED TO" 

1410 PRINT" FAST FORWARD OVER A FILE DEPENDS ON THE" 

1420 PRINT"SIZE OF THE FILE. IF THE FILE REQUIRES" 

1430 PRINT"2.1K OF MEMORY IT WILL TAKE A SMALL" 

1440 PRINT"MUMBEP. OF JIFFIES. IF THE FIIE REQUIRES" 

1450 PRIMT"11.3K OF MEMORY MORE JIFFIES WILL BE" 

1460 PRINT"REOUIRED." 

1470 PRINT" (DM] tD'.t] HOW MANY BYTES OF METIORY ARE REQUIRED" 

1480 PRINT'TOR THE FILE?" 

1490 PRINT" [RCJ (PLEASE GIVE A NUMBER LUE 2.1 OR 11.8)" 

1500 PRINT" (DM) ";: INPUT M 

1510 NM=M*1000 

1520 JJ=MM/1S 

1530 PRINT" (DN]";JJ;° IS THE NUMBER OF JIFFIES" 

1540 PRINT" [DN] [DM] WOULD YOU LIKE TO COHPUTE THE NUMBER" 

1550 PRINT"OF JIFFIES FOR ANOTHER FILE?* 

1560 PRINT" (D!!)";: INPUT AS 

1570 IF AS="YFS" THEN GOTO 1470 

1580 RETURN 



[CLR] 
[DN] 
[UP] 
[HM] 



CLEAR SCREEN 
CURSOR DOWN 
CURSOR UP 
CURSOR HOME 



[LC] 


CURSOR LEFT 


[RC] 


CURSOR RIGHT 


[RV] 


REVERSE 


[RVOFF] 


REVERSE OFF 



with two cassettes, one for tapes to 
be copied from and one for the tape 
to be copied to. However, I will not 
assume two cassettes are available 
in these instructions. 

First, one needs a long tape with 
TAPE BACKUP saved as the first 
file. Load and run the program. DO 
NOT REWIND THE TAPE. The tape 
is now ready for saving your backup 



file '0'. Take the backup tape out of 
the cassette and put the tape to be 
copied from in the cassette and load 
that program. Once the program is 
loaded type PRINT FRE(0). That will 
give the amount of RAM left. If that 
number is subtracted from the RAM 
available you then know the amount 
of RAM used by the program. Take 
the program tape out and insert the 
backup tape which is still at the 



position it was after loading TAPE 
BACKUP. Save the program at this 
point. Rewind the tape and load 
TAPE BACKUP again. Add the name 
of the new file to the table of con- 
tents. Then type RUN 1400 to com- 
pute the jiffies needed, and add this 
to the data statement in line 888. To 
save a second program run TAPE 
BACKUP again asking for file '1'. 
The program will fast forward over 
your '0' file and be in place for sav- 
ing file '1'. Then repeat the steps 
outlined above. 

To access a file is even simpler. 
Load TAPE BACKUP. Specify the 
file you want to access. The pro- 
gram will fast forward to that file, 
and you load the program. 

To save or access a data file (as 
opposed to a program) you need a 
program that will read and write the 
data file. Load TAPE BACKUP. 
When it has fast forwarded to the 
appropriate location take the 
backup tape out and load the pro- 
gram to read and write the data file. 
Read the data file, and take that 
tape out. Put the backup tape in the 
cassette, and write the data file. 

Making multiple file backup tapes 
is always a rather boring task; it is 
one of the overhead costs of having 
a tape based system. But this pro- 
gram takes a good deal of the 
drudgery out of the task. 



Computer House Div. 

Announces 

Programing Tools 

For the Commodore/ Disk 

"SCREEN DUMP/REPEAT" - $35.00 

In Machine Language, Dumps anything on CRT 
to Printer. Repeat Simulates Repeat on 8032 for 
8K, 16K &32K #2001. 

"VARI-PRINT" - $25.00 
Prints a Listing of all variables and every line 
number where each occurs. 

"DOCU-PRINT" - $20.00 
Similar to Screen Dump except in Basic for use 
within your own program. 

"FET/RECOVER" - $65.00 
File Editing Tool; Examine Data Files, Fix 
Destroyed Pointers, Sectors may be read, 
Modified, Displayed or Written — Also Files may 
be Re-chained. 

"SUPER RAM" - $20.00 
Diagnostic Routine Checks Every Possible RAM 
Address on 8K, 16K Er 32K CBM Computers. 

Available on Diskette right now 

"SCRUNCH" - $36.00 
For Apple II or Apple II Plus. Compacts Basic 
Programs up to 20%. 



Programs for Commodore / Apple 

"Legal Accounting" $1200.00 

"A/R, A/P, Job Est. & Job Cost 310.00 

"Political Party Mailing List" 150.00 



ENGINEERING & MACHINE SHOP 

"Machine Part Quoting" $280.00 

"Trig & Circle Tangent" 70.00 

"Bolt Circle" 25.00 

"Spur Gears" 35.00 

"Beams; Stress &• Deflection" 145.00 

"Tank Thickness" 

For Filament Winding 85.00 

All 6 for only $495.00 



And many others coming soon — including 
Report Gen. for Commodore — Ask for Catalog 
H80-C2. 

COMPUTER HOUSE DIV. 

1407 Clinton Road 

Jackson, Michigan 49202 

Phone: (517) 782-2132 



PET Vet 



by Loren Wright 
PET Specialist 
MICRO Staff 



Documentation on the PET is definitely improving, 
both from Commodore and from independent sources. 
PET veterans remember all the trouble they had in get- 
ting information, and I won't go into a long dissertation 
on Commodore's past inadequacies in this area. 
Neophytes can be assured that they won't have any of 
the same problems. 

Commodore currently has available PET User Manual 
(BASIC 2.0, $9.95), PET User Manual (BASIC 3.0, $9.95), 
CBM User Manual (BASIC 3.0, $9.95) and CBM User 
Guide ($7.95). As this column goes to press, a manual 
covering the 4.0 BASIC (Point of Reference Manual) has 
just been released. When the magazine reaches you, a 
manual covering the 5V*" Floppy Disk should be 
available. Neither was available in time for this column, 
but both sound as if they would be valuable. 

Recently several books applicable to the PET have ap- 
peared independently of Commodore. For the PET user 
who is new to both BASIC programming and the PET, 
Hands-On BASIC with a PET by Herbert D. Peckham 
(McGraw-Hill, 1979, $10.95) is an excellent starting point. 
Each chapter begins with specific learning objectives, 
progresses to a hands-on discovery session, then a 
discussion, and finally a quiz. Thinking is encouraged by 
"What do you think will happen if...?" Many illustrations 
of the PET's output and cartoons are liberally used to 
convey important points. 

PET/CBM Personal Computer Guide by Carroll S. 
Donahue and Janice K. Enger (Osborne/McGraw-Hill, 
1980, $14.95) is the comprehensive reference manual 
everyone hoped would come from Commodore. It is 
Commodore-authorized, which means, I imagine, that 
Commodore provided a lot of information and reviewed 
the manuscript. It is clearly written, well-organized, and 
prolifically illustrated. There are many programming 
hints, although the book is not intended as a programm- 
ing manual. 

The authors make liberal use in the text of photos, 
keyboard diagrams, flow charts, and actual PET output. 
All of the essential charts and tables (memory maps, 
ASCII and PEEK/POKE codes, error messages, and lots 
more) are included in an appendix. Whenever there is a 
difference between operation with old and upgrade 
ROMs this is clearly pointed out. The book lacks inter- 
facing information, and assembly language is only 
touched upon, but otherwise it is an invaluable 
reference for every PET owner. The book is currently be- 
ing revised and expanded to cover all three BASICS and 
all of the Commodore peripherals. The new edition, due 
in November, will be enclosed with all new PETs sold. 

PET and IEEE 488 Bus (GPIB) by Eugene Fisher and 
C.W. Jensen (Osborne/McGraw-Hill, 1980, $14.95) covers 



just about everything you need to know about the GPIB. 
Even if you only want to understand the bus on an in- 
tuitive level, the book is designed to accomodate you. Of 
course, if you want timing diagrams and schematics, 
those are here too. Once you start reading it, you will 
probably find youself learning more than you had 
originally intended. The cartoons, aside from entertain- 
ing, actually reinforce the essential concepts. An 
especially valuable feature of the book is a section giv- 
ing detailed instructions for using five different 
peripherals with the PET on the bus. Another is a section 
on adapting non-standard devices to the bus. Many PET 
owners fail to realize the potential of that mysterious 
connector back there between the power cord and the 
parallel user port. This book should get many reluctant 
users to actually use It! 

Another book — PET Machine Language Guide — is 
available from Abacus Software (P.O. Box 7211, Grand 
Rapids, Ml 49510, $6.95 plus $.70 postage). It covers a 
wide range of necessary operations, such as arithmetic, 
address handling, and input/output. Also included are 
detailed descriptions of many of PET's own routines. 

Some Common BASIC Programs, PET edition by 
Poole, Borchers and Donahue (Osborne/McGraw-Hill, 
$12.50), should be valuable, too. Unlike other books of 
BASIC programs available, this book contains programs 
that will work in your PET without having to be con- 
verted from some other kind of BASIC. Also, the pro- 
grams are available on 5V«" floppy disk and cassette. 

With the increased attention to documentation on the 
part of Commodore, and with the arrival of these ex- 
cellent independent works, the PET is now finally being 
well served, and It looks as if things are going to be get- 
ting even better. 

About Reviews 

MICRO'S standard policy is for independent reviewers 
to review products and books for the monthly 
MICROScope section. Manufacturers and publishers 
wishing to have their product(s) reviewed should send 
for and complete a Product Evaluation Form for each 
product submitted. Game-type software is not accepted 
for review. Readers interested in becoming potential 
reviewers should send for and complete a Reviewer 
Qualification form. Unsolicited reviews will not be ac- 
cepted. 

On a Related Subject 

Robert Purser has announced that he will no longer 
review PET software in Purser's Magazine, citing as the 
primary reasons his diminishing PET readership and 
Commodore's announced priority shift from home to 
business systems. 
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REAL WORLD I 

FOR YOUR APPLE II 



A/D + D/A 

Commercial, scientific, and 
industrial data acquisition and 
control functions are now prac- 
tical with Mountain Hardware's 
A/D + D/A card. Superfast 
conversion time permits high 
frequency and other applica- 
tions not possible with slower 
cards. 

A/D + D/A features: 
*SinglePCcard 
*16 channels analog to digital 
input 

*16 channels digital to analog 
output 

*9jus conversion time 
*8 bit resolution 
*l/0 cable assembly available 
*Operating manual contains 
sample applications with 
schematics, parts list, and 
guides for easy start-ups. 
*Self-test diagnostic software 




If you've got a data acquisition 
or control application, Mountain 
Hardware has the answer with 
A/D + D/A. Drop by your Apple 
dealer and put your world on a 
silver platter. 



IK Mountain Hardware 

LEADERSHIP IN COMPUTER PERIPHERALS 

A Division ol Mountain Computer. Inc. 

300 Harvey West Blvd.. Sanla Cruz, CA 95060 
(408) 429-8600 

Send me information. 



<S 



Name . 



Address 
City 



State_ 



Zip 



Phone_ 



"Apple II is a trademark ot Apple Computer, Inc. 



SPECIAL INTRODUCTION 
ONLY '9 9.9 5 

FOR THE FINEST PARALLEL INTERFACING ELEfENT FOR THE PEi/OK* 
The P.l.E.-C is a very complete interface. It comes in an attractive case and 

MOUNTS DIRECTLY TJ THE COMPUTER. THUS ELIMINATING 'HE NEED »OR EXTRA SPACE IN THE 
BACK =OR SOXES AND MESSY PILES Of HIRE. YOUR SYSTEM CAN LOOK PROFESSIONAL. ThE 
P.I.E.-C HAS COMPLETE ADDRESS SELECTA3ILITY OF DEVICE NUMBERS <[ THROUGH 30. AnO. 
THERE'S NO NEED TO DISASSEMBLE YOUR UNIT TO CHANGE THE ADDRESS: IT'S AS SIMPLE 
AS SETTING THE DIP SWITCH. T H |S SELECTABILITY ALLOWS BOTH YOUR LETTER-OUALITY 
PRINTER (NEC SPINWRITER. ETC.) AND YOUR GRAPHICS PRINTER TO 3E CONNECTED AT THE 
SAME TIME 3UT USED SEPARATELY BY ADDRESSING EACH WITH A DIFFERENT DEVICE*. 
NOW THAT'S REAL EFFICIENCY!! 

The P.I.E.-C will convert non-standard PET codes to true ASCII code. It can be 

SWITCHED IN OR OUT OF SERVICE AS NEEDED. FOR INSTANCE. IF YOUR SOFTWARE DOES THE 
CONVERSION. JUST SWITCH THE CONVERTER OFF, |f you NEED THE CONVERSION *OR 
PRINTING FROM BASIC. JUST SWITCH IT ON. 

Our interface provides extension of the 1EEE-188 port on the FET/C3H. You don't 

HEED TO BUY OTHER CABLES 3ECAUSE OUR INTERFACE USES THE SAME CARD EDGE TYPE AS 
THE COMPUTER. Thus the cable from THE FLOPPY DISC TO THE PET/C3H WILL now con- 
nect INTO THE INTERFACE. 

The P.I.E.-C is interconnected with, and powered by. the printer using a 5' data 
cable supplied with the interface. This mean that there is no power supply 

NECESSARY AS WITH SERIAL INTERFACES. THE »5v IS SUPPLIED ON PIN* 18 OF THE CON- 
NECTOR USED BY ALL TRUE CENTRONICS STANDARD INTERFACED PRINTERS. ThIS INCUDES 

the Centronics 779. °1, and many others including the Anaoex printers. 

Our interface goes sevond the Centronic's compatibility, Therefore, it will 

operate the Anderson- Jacobson AJ811 and the "Paper t iger' 3y integral jATA 

Systems. In fact, it will drive any parallel-input printer that uses 3 -data sits 

and 2 handshaking lines. 

If you are interested in the most interface por your money, then place your order 

today. Our introductory price for the P.I.E.-C interface won't last long, So. 

don't delay ... you may have to pay the list price of $119.95. 

Please specify your PET/CBH r-PE (new or old ROMs) and the brand ano -odel of the 

PRINTER YOU WILL BE USING. WE ATTACH THE CORRECT CONNECTOR ON THE :A3L£ . 

All orders must be prepaid or COD cash. Add S5 for shipping and handling. 
Maryland residents add ;I sales tax. 

LemData Products. P.O. Box 1030, Columbia. Id. 21011 
Phone (501) 730-3257 

•PCT/C8N .r« •>y:<-<"' of Cowncdore 3blic«»l -jchimi 



WP-6502 

a very fine word processor 




Tape (C1.C2.C4J $75 

5"Disk(C1,C2,C4) ,..$75 
8" Disk for 65D $75 



8" B5D & 65U 
Descriptive 
Brochure 




Dwo Quong Fok Lok Sow 

23 East 20th Street 

New York City, New York 10003 

<21 2)685-21 88 





THE WIZARD AND THE PRINCESS 
HI-RES ADVENTURE *2 



Only ON-LINE SYSTEMS could deliver a HI-RES 
ADVENTURE game on such an epic scale. In thlsadventurc you 
find you must do battle against an evil wizard in order to save the 
life of the princess. To find the wizard and his castle you must 
first cross deserts, oceans, mountains, travel to an island and 
encounter many strange beasts. You will be forced to learn 
magic, navigate at sea and dig for treasure. This game should 
provide months of adventure. 

• HUNDREDS OF HI-RES PICTURES ( looks great on b/w and 
color televisions) 

• FULL 21 -COLOR!! HI-RES GRAPHICS (each room a work of 
art) 

• YOUR GAME MAY BE SAVED FOR LATER CONTINUANCE 

• RUNS ON BOTH 48K APPLE II AND APPLE II PLUS 

• BY FAR THE MOST AMBITIOUS GRAPHIC GAME EVER 
WRITTEN FOR THE APPLE!! 

Hi-Res Adventure "2 is available now at your local computer 
store and requires a disk drive. To order directly send 832.96 Ur. 

On-Line Systems 
36575 Mudge Ranch Road 
Coarsegold, CA 93614 
209-683-6868 

MSA, MST CHG, COD, CHECK ACCEPTED 
Look for Hi-Res Football coming soon 
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In the October issue of the Ohio Scientific Small 
Systems Journal, we are introducing the C1P family of 
personal computers — the C1P Series 2. The article 
describes the product and additionally contains some 
applications information. 

Another new product being featured this month is the 
DMS Planner. The Planner is an extremely sophisticated 
data management and planning system. The article con- 
tains several examples which illustrate some of the 
system's remarkable features. 



As always, comment on article content is welcomed. 
Please submit suggestions, or any other contributions 
to: 

Ohio Scientific, Inc. 

1333 S. Chillicothe Road 

Aurora, Ohio 44202 



C1 P Series 2 Computers 

Ohio Scientific's new C1P Series 2 line is the most 
cost effective of the Ohio Scientific family of microcom- 
puters. In spite of its economical price, the new C1P in- 
cludes many deluxe features usually found only in much 
more expensive systems. 

The features of the standard C1P Series 2 include: 
8K BASIC-in-ROM and 8K program RAM 
Switch selectable audio cassette/modem/printer 
port 

Sound, music and voice output via digital to analog 
converter 
Software selectable display format (24x24 or 12x48) 

The basic system is easily expandable to single or dual 
mini-floppies and 32K of program RAM. Additional ex- 
pansion via the new 630 board allows expansion to a 
color display, joystick interface, AC remote control and 
home security system. 

The C1P Series 2 personal computer is specifically 
designed for the first-time personal computer user and 
for use in educational environments. 

Personal or Home Computers 

Challenger IP's advanced character graphics, noise- 
free display, programmable keyboard and high speed 
BASIC make it capable of spectacular video games, 
animation, and elaborate computer games. Ohio Scien- 
tific offers an extensive library of one and two player 
video games that are very similar to conventional 
"arcade games," as well as a complement of 
"standard" computer-type games. 

The C1P Series 2 flopting point decimal arithmetic 
capability in conjunction with its cassette storage 
abilities make it practical for many forms of personal 
financial aid and analysis. Ohio Scientific's cassette 
library includes a checkbook balancing program, sav- 
ings account program, and annuity and loan analysis 
programs. Budget planning aids include home owner- 
ship cost analysis and expense accounting. A complete 
home budget system is available for use on the C1P 
Series 2 mini-floppy system. 



It should be pointed out that a mini-floppy disk is a 
necessity for some of the advanced applications men- 
tioned above. 

Additionally, the C1P Series 2 BASIC has full 
transcendental arithmetic capability, including 
trigonometric functions, logarithms, exponentiation, 
and full scientific notation. These features are available 
in the "immediate mode" of operation as well as the 
stored program mode. For instance, a user can quickly 
turn the computer on, type in an equation as a single 
line, and press return to get an answer. The computer 
can double as an advanced scientific calculator with 
much greater ease of use than any available calculator. 

The program storage and alphanumeric capability of 
the Challenger 1P make it extremely valuable to 
engineers, students, and educators for solving scien- 
tific, engineering and mathematical analysis problems. 
Ohio Scientific's cassette library includes several ad- 
vanced mathematics oriented programs including a pro- 
grammable calculator simulator and a mathematical 
function library. The library also includes applications 
programs such as definite integrals, statistical analysis, 
and other complex mathematical functions. In general 
the Challenger 1P will be hundreds of times faster than 
the most powerful scientilfic calculators in the 
"number-crunching" applications. 

Education 

Challenger 1 P series personal computers are extreme- 
ly versatile in educational computing applications. Once 
the user gets involved in the educational applications of 
these machines, he will quickly consider them a 
necessity in the educational process. 

Young children from kindergarten to grade six are ex- 
pecially attracted to computers. As the child's reading 
ability develops he quickly masters the elementary 
operations of the computer. It is not at all unusual for 
six-year old children to respond to mathematical pro- 
blems on a personal computer. Children's natural 
fascination with computers in conjunction with C1P's 
cartoon-like interactive capability make the computer 
highly valuable in a modern educational environment. 
Programs which teach, tutor and drill students in 
virtually all areas of education can be easily program 
med on the Challenger 1P system. Ohio Scientific has a 
full library of several types of educational games which 
can be used as an example in programming such ap- 
plications. These programs range from a simple 
"Sesame Street" type arithmetic cartoon through 
mathematical drills, to word games such as 
"Hangman". 

Another broad area of education is in teaching com- 
puter fundamentals. The Challenger 1 P utilizes the most 
popular upper level language, BASIC, in a very complete 
and concise implementation. With the Challenger 1P the 
user can teach or learn BASIC in conjunction with any of 
the commonly available text books on the BASIC pro- 
gramming language. The C1P series machines have full 
machine code accessibility including the machine code 
monitor so that advanced students can enter, edit and 
execute machine programs. A very fast and interactive 
assembler/editor is available to run on Challenger 1P 
machines so that students can be introduced to the con- 
cepts of assembler programming and editing. 
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Advanced Applications 

There are many other applications of the basic 1P 
machines that have not been mentioned here. The C1P 
Series 2 mini-floppy provides the user with the extra con- 
venience of virtually instantaneous loading and storing 
of programs on mini-floppy disks. The addition of a mini- 
floppy disk drive to the C1P also provides convenient 
construction and access of data files. Using the file 
capabilities of the C1P MF, an educator can develop an 
interactive textbook with a quick access data base for 
any educational topic. In the home, the data file opera- 
tion of the mini-floppy makes the Challenger 1 P a deluxe 
personal service computer giving the user easy access 
to phone numbers, a personal calendar, addresses and 
other file-type information. 

C1P Series 2 Expansion 

The 630 I/O Expander board is available for addition to 
either the C1P or C1P MF. This board provides the C1P 
with the state-of-the-art in input/output capabilities 
rivaling the most expensive small computer systems 
available today. This board allows direct interface with 
joysticks, remote keypads, AC remote control units, 
home security system and more. It also substantially en- 
hances the video display capabilities of the Series 2 
models in the Challenger 1P line by allowing the display 
of up to 16 colors with any of the standard 256 graphics 
characters. The color is available either as standard com- 
posite video or with RGB (red-green-blue) direct color 
drive. 



% 



$>MS PLANNER 

Ohio Scientific, Inc. is pleased to introduce MDMS 
Planner, a preprogrammed computer system for the 
home computerist as well as managers and con- 
sultants. 

Planner is a technical analysis computer system 
which was designed to perform financial planning 
statements and analysis projections. And because Plan- 
ner is preprogrammed and very flexible, it is easy for the 
untrained computer user and non-technically oriented 
person to use. This flexibility is accomplished through 
the use of models. 

A model is a small scale representation of a large 
scale event. Models are used throughout industry in far 
too many forms to mention, but a common and familiar 
type of model is the wind tunnel. 

The wind tunnel has made possible great achieve- 
ments in the field of aerodynamics, because of three 
characteristics it shares with other types of models: 
precision, efficiency, and relatively low cost. Just think 
of the difference in working with a six-foot model as op- 
posed to a full-sized aircraft. The model allows for more 
precise measurements of any variance; it can be ad- 
justed more efficiently and simply than full scale 
systems, and it costs much, much less, both in intitial 
investment and redesign. 

Financial modeling shares these desirable features 

with other types of modeling and is similar in concept. 

"Jtolike the wind tunnel, financial modeling can be useful 

"everyone, from home budgeters to plant managers 



and consultants. Anyone who needs to know where 
money is going (or should be going!) can benefit from 
financial modeling. 

Moreover, Planner provides a means of storing 
models and their results on disk, each stored in 
separate data files. This allows the user to recall a 
model and/or a given set of results for future use. Such a 
feature saves time by not having to re-enter models 
and/or results (or vice versa) since both are stored 
separately. 

When constructing a model, the user must lay out and 
design it by defining the lines and columns that should 
exist. This includes specifying title lines (/T), blank lines 
(/), single (/-), and double underlining (/ = ) (Example 1 and 
2). Example 1 illustrates lines that might be used in a 
home budget. After each line is entered, it is formatted 
and displayed to the right of its entry. Example 2 
illustrates columns that might be used for the same 
home budget. Like Example 1, after each column is 
entered, it is formatted and reprinted. 



Example 1 

LINE EDIT: AUP ADOWN ACOPY AMONTIIS AWIDTH AEDIT A< A> 

BUDGET 1980/T BUDGET 1980 

IHCOME/T INCOME 

/- 

SALARY SALARY CO 

BONUS BONUS (S) 

/- 

TOTAL INCOME TOTAL INCOME (7) 

/ 

EXPEIIDITURES/T EXPENDITURES 

/- 

GROCERY GROCERY (11) 

UTILITIES UTILITIES (12) 

CAR PYMT 6 TRANS CAR PYMT 6 TRANS (13) 

HOUSE PYMT £ MAINT HOUSE PYMT 6 MAINT (11) | 

INSURANCE INSURANCE (15) 

SAVINGS SAVINGS (16) 

CLOTHING CLOTHING (17) 

MEDICAL MEDICAL (18) 

RECREATION RECREATION (19) 



CURSOR AT LINE 1 



FORMATS: /T /- /= /$ /» /I 



Example 2 

COLUMN EDIT: ALEFT ARIGHT ACOPY AMONTHS AWIDTH AEXIT A< A> 



JAH/80 FEB/80 MAR/80 APP./80 M/.Y/80 JUN/80 JUL/80 
AUG/80 SEPT/80 



CURSOR AT CI 



FORMATS: /L /R /$ /» /I 
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Example 3 

RULE EDIT: AUP AIlOWN ACOPY AEXIT A< A> 



ADD 1,1 

HU.li L4 

MUL LM 

HUL L7 

MUL L7 

HUL L7 

HUL L7 

MUL LI 

HUL L7 

TOT LI 

DIV L2 

SUB L2 

TOT CI 



L5, SAVE 

BY 12%, 

BY 5%, 

by 10%, 

BY 10%, 

BY 35%, 

BY 1S%, 

BY 20%, 

BY 25%, 

1 THR L21 

3 BY L7, 

3 FROM L7 

THR C12, 



1.7 
SAVE Lll 
SAVE 1.16 
SAVE LI 9 
SAVE L20 
SAVE L19, C6 
SAVE L20, C6 
SAVE Lll, C12 
SAVE L20, C12 

SAVE L23 
SAVE L2M 
SAVE L25 

SAVE C13 



RULE #1 



OPERATIONS: ADD,SUB,MUL,DIV,AVE,FIL,TOT,MAX,MIN,GRO 



The initial values and amounts of the lines and col- 
umns are then entered. Finally, the calculations, or what 
is referred to as the rules to be performed on the lines 
and columns, are entered. Example 3 is a list of rules that 
might be run on the home budget example. For instance, 
rule two (MUL L4 BY 12%, SAVE L11" in English means 
"multiply line 4 by 12% and save the answer in line 11". 
A simpler interpretation is that the grocery bill will be 
12% of each month's salary. 



Planner is an unstructured system which allows the 
user to set up models and perform specific operations 
with a single key stroke. Models may be executed and 
set up in any fashion and can be edited and re-entered, 
allowing the user to run a "What If" pro forma calcula- 
tion (Example 4), budgets (Example 5), etc. Because 
Planner is a semi-screen formatted system, formatted 
and easy to read reports and worksheets can be 
displayed on both the console and line printer. 



Example 4: "What If" my sales for the first quarter 
were one million dollars, cost of sales were $530,000 and 
sales grew by 25% for the remaining three quarters, but the 
cost of sales only increased by 20%. What would gross 
profit be per quarter? Per year? (See copy of pro forma 
below.) 



Example 4 

This is en example of • "What If" pro for»a calculation! 



1ST QTR 



2ND QTR 



3RD QTR 



4TH QTR 



12/31/79 
PRGE 1 

ANNUAL 



INCOME 



SALES 

COST OF SRLES 



c3> 1000000. 00 

<4> 338800. 08 



e. oe 
e. 00 



e. ee 

0. 00 



8 00 

e. op 



00 
0. 00 



CROSS PROFIT 



<6> 



0. 08 



8. 00 



8 08 



8 80 



0. 88 



This is en vxampl? of a "What If" pro forma calculation! 



1ST QTR 



2ND QTR 



3RD QTR 



4TH QTR 



12/31/79 
PACE 1 

RNNURL 



INCOME 



SRLES 

COST OF SRLES 



<3> 1080000. 00 1230008 88 1362300. 00 1933123. 00 24*1406. 23 
<4> 338808 00 636880. 00 763280. 00 913840. 80 1099000. 00 



GROSS PROFIT 



<6> 470000 88 614008. 08 799300. 00 1837203. 80 1342398. 25 



V. 



Example 5: Now that I have received a raise, can the 
cost of leasing a car and transportation expenses (leas- 
ing and transportation cost estimated at $68.00/mo) fit 
in my budget? Keep in mind that groceries are 12% of 
my salary, utilities fluctuate according to seasons, sav- 
ings are 5% of salary, recreation is 10% of income, and 



contributions and gifts are 10% of income. All other ex- 
penses are fixed amounts. 

Note: Twice a year a $500 bonus is given: Vacation 
(June) and Christmas, thus causing more money to be 
needed for certain expenditures in June and December. 
(See copy of budget .) 
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Example 5 
Bob * Nancy Jones 
| Monthly Budget 
For 1908 

(Which includes -the additional expense of leasing a car) 
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BUDGET 1988 
INCOME 



JRN/80 FEB/80 MAR/88 RPR/88 MflV/88 JUN/88 



JUL/80 



SRLRRV 
BONUS 



<4J 
<3> 



921. 49 
8. 00 



939. 21 

0. 00 



930. 80 934. 87 
8. 88 0. 00 



930. 08 
0. 00 



930. 00 930 71 
300. 00 0. 00 



TOTAL INCOME 

EXPENDITURES 



<7> 



921. 49 939. 21 930. 00 934. 87 930. 00 1450. 00 930. 71 



GROCERY 


■ ••■■ipiaaiaaia 


<11) 


110. 


38 


112. 


71 


114. 


80 


114. 


38 


114. 00 


114. 


88 


111. 


69 


UTILITIES 




<12> 


170. 


80 


170. 


88 


133. 


88 


140. 


88 


123. 08 


lie. 


80 


93. 


08 


CRR PVMT t-. 


TRRNS 


(13) 


68. 


80 


68. 


88 


68. 


80 


68. 


88 


68. 80 


68. 


00 


68. 


00 


HOUSE PVMT 


« MRINT 


<14> 


213. 


00 


213. 


80 


213. 


B0 


213. 


00 


213. 08 


213. 


00 


213. 


88 


INSURANCE 




<13) 


62. 


30 


62. 


38 


62. 


30 


62. 


30 


62. 38 


62. 


30 


62. 


58 


SAVINGS 




<16> 


46. 


87 


46. 


96 


47. 


38 


47. 


74 


47. 30 


47. 


30 


46. 


34 


CLOTHING 




<17> 


28. 


80 


20. 


88 


28. 


00 


20. 


88 


28. 00 


28. 


00 


28. 


88 


MEDICRL 




<18> 


23. 


00 


23. 


00 


23. 


00 


23. 


80 


23. 00 


23. 


00 


23. 


00 


RECREATION 




<19> 


92. 


13 


93. 


92 


93. 


00 


93. 


49 


93. 08 


387. 


30 


93. 


0/ 


COHTRIB « GIFTS 


<28> 


92. 


13 


93. 


92 


93. 


O0 


93. 


49 


93. 88 


217 


30 


93. 


ur 


MISC. 




<21> 


28. 


00 


20. 


00 


28. 


80 


20. 


88 


20. 00 
887. 88 


38 


00 


28. 


00 


TOTAL EXPENDITURES 


<23) 


921. 


43 


928. 


01 


917. 


08 


903. 


88 


1437 


00 


849. 


86 


PERCENTAGE. 


'INCOME 


<24> 


188 


ex 


98. 


BX 


96. 


5X 


94. 


7X 


93. 4X 


99 


IX 


91. 


3% 


UNBUDGETED 


MONEY 


<25> 


0. 


04 


11. 


20 


33. 


00 


31. 


87 


63. 00 


13 


00 


88. 


83 
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RUG/88 




SEP/88 


OCT/88 




HOV/80 




DEC/88 




ANNUAL 


BUDGET 1988 


























INCOME 






08 




















SALARY 


<4> 


933. 


967. 


18 


942. 


26 


983. 


64 


997. 


77 


11448. 13 


BONUS 


<3> 


8. 


80 


0. 


88 


8. 


80 


8. 


88 


388. 


88 


1800. ee 


TOTAL INCOME 


<?■> 


933. 


00 


967. 


18 


942. 


S6 


983. 


64 


1497. 


77 


12440. 13 


EXPENDITURES 


























GROCER V 


<il> 


114. 


36 


116. 


86 


113. 


07 


118. 


04 


199. 


33 


1432. 64 


UTILITIES 


<12> 


93. 


80 


110. 


08 


123. 


00 


148. 


88 


133. 


88 


1390. 88 


CAR PVMT t, TRANS 


<13) 


68. 


88 


68. 


00 


68. 


00 


68. 


88 


68. 


88 


816. ee 


HOUSE PVMT « MRINT 


<14) 


213. 


80 


213. 


80 


213. 


88 


213. 


08 


213. 


88 


2388. 88 


INSURANCE 


<15) 


62. 


30 


62. 


30 


62. 


38 


62. 


30 


62. 


38 


738. ee 


SAVINGS 


<16) 


47. 


63 


48. 


36 


47. 


11 


49. 


18 


49. 


89 


372. 01 


CLOTHING 


<17> 


28. 


00 


28. 


88 


28. 


08 


28. 


88 


123. 


88 


343. ee 


MEDICAL 


<18> 


23. 


00 


23. 


88 


23. 


08 


23. 


80 


23. 


88 


300. 00 


RECREATION 


<19> 


93. 


30 


96. 


72 


94. 


23 


98. 


36 


149. 


78 


1606. 31 


CONTRIB * GIFTS 


<28> 


93. 


30 


96. 


72 


94. 


23 


98. 


36 


374. 


44 


1341. 18 


MISC. 


<21> 


28. 


00 


28. 


00 


28. 


00 


28. 


88 


78. 


88 


320. ee 


TOTRL EXPENDITURES 


<23> 


838. 


11 


878. 


36 


884. 


14 


914. 


43 


1494. 


16 


11873. 34 


PERCENTRGE/INCOME 


<24> 


98. 


OX 


98. 


8X 


93. 


8X 


93. 


ex 


99. 


8X 


1141. 2X 


UNBUDGETED MONEY 


<23> 


94. 


89 


88. 


8E 


38. 


12 


69. 


19 


3. 


61 


366. 79 



After reviewing the results of the model, the user can 
change any or all of these values. Immediately re- 
execute the model and instantly obtain new results. This 
process can be repeated as many times as needed. This 
feature is what makes Planner so astounding! It allows 
the user to actually see what future benefits or losses 
which could occur under the given set of circumstances. 



Many business administrators spend much time 
forecasting the likely effects of business transactions 
for a distinct period of time. Planner provides the essen- 
tials to perform such forecasting along with profit and 
loss projections, budgets, make/buy decision analyses, 
cost extimating, etc. Planner uses are limited solely to 
the imagination of the user. 



OHIO SCIENTIFIC 133 Chillicothe Road • (216)831-5600 




regressive 
omputing 



Hardware: C1P Video Mod: Makes your 600 Video every bit 
as good as the 4P and 8P. Gives 32/64 CHR/Line with guard- 
bands 1 and 2 Mhz. CPU clock with 300, 600 and 1200 baud 
for Serial Port. Complete Plans $19.95 

KIT(Hardware and Software) $39.95 
lnstalled:32CHR — $79.95, 64CHR — $84.95 
Extra K of Video RAM for 64CHR. not included! 

C1P Sound Effects Board: Completely programmable! For 
the discriminating hobbiest, the best board on the market 
for creating sound and music. Can be interrupt driven so 
that you can use it for gaming purposes. Has on board 
audio amp, 16 bit interval timer, 128 Bytes of RAM and two 8 
bit parallel I/O ports. Assembled and tested $89.95 

Bare Board $39.95 — both include Prog. Manual and Sam- 
ple Software. 

C1P HI Speed Cassette Kit: Gives a reliable 300, 600, and 
1200 Baud. No symmetry adjustments — the ideal fix for 
OSI's cassette interface. Easily implemented in 30 minutes. 
Will save you time and money even the first night you use 
it! $12.95 



"SPECIAL INTRODUCTORY OFFER** 
Programmable Character Generator Board $89.95 

You can use OSI's characters or you can make your own. 
Imagine you can now do true high resolution graphics 512 x 
256 individual dots in the 64x32 screen format. And all 
under your control! 

Other mods available — send for catalog. 

SOFTWARE (with Documentation) 
PCCHessV1.9 $19.95 

Play Chess against your computer! 
Helicopter Pllot:(64 CHR Video Only) $8.95 

An Excellent Graphics Program! 
Golf Challenger $14.95 

From 1 to 4 players. Play a round of golf on your 18 hole golf 
course. One of the best programs I have seen! You can even 
design your own course. Comes with full documentation (14 
pages). 

Two Very Intricate Simulations! 
Wild Weasel II: You operate a Sam Missile base during a 
Nuclear War. Not as easy as you think! You must operate in 
a three dimensional environment. 

Failsafe II: The shoe is on the other foot! Here you are in the 
attacking bomber and you must penetrate deep into enemy 
territory. Can you survive? An extremely complex electronic 
warfare simulation! SPECIAL, both for $19.95 

Many, Many more. Send for Catalog with free program 
(Hard Copy) and BASIC Memory Map. $1.00. Two Locations 
to serve you: 

3336 Avondale Court, Windsor, Ontario 

Canada N9E 1X6 

(519) 969-2500 

or 

3281 Countryside Circle, Pontiac TWP. Ml 49057 

(313) 373-0468 




American Data, Inc. 

The world's largest distributor of 
Ohio Scientific, Inc. Microcomputer Systems 



ANNOUNCES 

That OSI has appointed American Data as the exclusive 
distributor of Ohio Scientific products for Europe including the 
United Kingdom, Benelux, France, West Germany, Austria, 
Switzerland, Denmark, Italy, Spain, Portugal, Greece, Turkey, 
and Iceland. 

Dealer inquiries invited. Contact Barbara Hall, 352-23-172, 
Luxembourg or David O'Brien, American Data (301) 840-9540 
Telex 64405 (USA). 



Paged Printer Output for the APPLE 



Improve the format of your printed output by adding a 
page mode to your system. 



Gary Little 
#101-2044 West Third Ave. 
Vancouver, B.C. V6J 1L5 



If you have ever sent output to a 
printer you have probably become 
very annoyed when the output con- 
tinued from the the very end of one 
page and then on to the next. 
Wouldn't it be nice if the printer 
would automatically scroll to the 
top of a new page when it got near 
the bottom of the previous one? Of 
course it would, and the PAGER 
program will do it for you. PAGER 
will count the number of line feeds 
that are sent by APPLE to the printer 
and when this total reaches 54, 
twelve blank lines will be generated 
to automatically bring you to the top 
of the next eleven-inch page. 
PAGER can be used from within a 
program or from immediate- 
execution mode. It is extremely 
useful for LISTing long programs 
page by page. 

PAGER, the source listing of 
which appears below, has been writ- 
ten for use with a serial printer that 
is connected to the APPLE serial in- 
terface card. If PAGER is to be used 
in conjunction with a parallel printer 
connected to the APPLE parallel in- 
terface card, two bytes of the 
routine must first be changed. To 
make these changes, load PAGER, 
and then enter the following two 
commands from BASIC: 

POKE 785,2 
POKE 812,2 

The modified program should then 
be saved. 

In order to change the number of 
lines that are printed before PAGER 
causes the paper to scroll to the top 



of the next page, enter the com- 
mand POKE 798,LP from BASIC, 
where LP is the required number of 
lines per page. 

In order to change page length, 
enter POKE 804.PL from BASIC, 
where PL is six times the length of 
the page (in inches). For example, 
for an eleven inch page, PL = 66. 
Note that PL must be greater than 
LP. 

Output to the printer can be 
stopped after each page is printed 
by entering a POKE 822,1 command 
before activating PAGER. To pro- 
ceed after a page has been printed, 
simply press any key on the 
keyboard. This 'page pause' feature 
must be used when the user is 
feeding each piece of paper to the 
printer manually. To turn off the 
•page pause', enter a POKE 822,0 
command. 

Instructions for Use Within 
a Program 

The following sequence should be 
used to turn the printer on and off 
from within a BASIC program: 

5 D$ = CHR$(4) 

10 PRINT D$;"PR#1" 

20 LW = 132: REM LINE WIDTH 

30 PRINT CHR$(9);LW;"N" : PRINT 

CHR$(9); "K" 

40 CALL 768 : REM TURN ON 

PAGER 



(Generate Output) 

50 PRINT D$;"PR#0" 
TURN PRINTER OFF 



REM 



If DOS is not being used, change 
line 10 to PR#1 and line 50 to PR#0 
and delete line 5. If a serial printer is 
being used, delete lines 10, 20, and 
30. 

Instructions for Use 
Outside a Program 

If a serial printer is involved, 
PAGER can be activated by a CALL 
768 from BASIC. It can be deac- 
tivated by a PR#0. If a parallel 
printer is involved, PAGER can be ac- 
tivated by performing the following 
four steps: 

1. Enter PR#1 

2. Enter CTRL-I 132N (132 or other 

line width). 

3. Enter CTRL-I K 

4. Enter CALL 768 

It can be deactivated by a PR#0. 
Additional Notes: 

1. Remember to set the DIP 
switches on the serial printer inter- 
face card for the appropriate baud 
rate and line width before activating 
PAGER. 

2. Remember to adjust the paper in 
the printer so that the first line 
printed will be at the desired 
starting position before activating 
PAGER. 

3. Make sure that a PRINTed line will 
not exceed the line width which has 
been set for the printer. If it does, 
then the overflow will appear on the 
next line and this line will not be 
taken into account by PAGER. 
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BY GARY LITTLE 










7 


ft 


» 101- 


2044 WEST THIRD AVENUE 








8 
9 
10 


ft 
a 


VANCOUVER B. 


C. V6J 1L5 








ft 


INSTRUCTIONS 
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POSITION THF 


PAPER IN 


YOUR 








13 


ft 


PRINTER AND 


THEN CALL 


768 








14 


ft 


FROM 


BASIC TO ACTIVATF 










15 


ft 


THIS 


ROUTINE 


. TO DEACTIVATE, 








16 


ft 


ENTER 


A PRJO 


a 










17 


ft 
















18 


ft 


PACE 


PAUSE FEATURE: 










19 


ft 


POKE 82 2, 


TO TURN 


OFF 








20 


* 


POKE 822, 


1 TO TURN 


ON 








21 


* 
















22 


* 


LINES 


PRINTED PER PAGE 










23 


ft 


POKE 798, 


LP 










24 


* 
















25 


ft 


PACE 


LENGTH: 












26 


* 


POKE 804, 


PL 










27 


ft 
















28 


* 


DESCRIPTION: 
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30 


ft 


THIS. 


ROUTINE 


WILL SEND 


'PL-LP' 








31 


ft 


BLANK 


LINES 


TO THE PRINTER 








32 


ft 


AFTER 


•LP' LINES HAVE 


BEEN 








33 


ft 


SENT 


BY THE 


USER. 
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* 
















35 


* 


DEFAULTS: 












36 


ft 


LP 


= 54 












37 


ft 


PL 


" 66 (11" PAPER) 










38 


ft 


PACE PAUSE OFF 










39 


ft 
















40 


******* * *************** ****** *** 








41 


COUNT 


EQU 


$6 


LINE COUNT STORAGE 








42 


CSML 


EQU 


$36 


OUTPUT HOOK 








43 


DOS 


EQU 


S3EA 


DOS I/O UPDATE HOOK 








44 


KBD 


EQU 


$COO0 


KEYBOARD 








45 


STRB 


EQU 


SCOI 


KEYBOARD STROBE 








46 


PRINT 


EQU 


scioo 


PRJ1 SERIAL OUTPUT 








47 






ORG 


$300 




0300: 


A9 


OF 


48 






I.DA 


f <START 


SET OUTPUT HOOK 


0302: 


85 


36 


49 






STA 


CSWI, 


TO START OF ROUTINE. 


0304: 


A 9 


03 


50 






LDA 


*>START 




0306: 


85 


37 


51 






STA 


CSWL+1 




0308: 


A 9 


00 


52 






LDA 


J$00 


ZERO THE LINE COUNTER. 


030A: 


85 


06 


53 






STA 


COUNT 




030C: 


4C 


EA 03 


54 






JMP 


DOS 


GIVE HEW HOOK TO DOS. 


03OF: 


48 




55 


START 


PHA 




.ROUTINE STARTS HERE. 


0310: 


20 


00 CI 


56 






JSR 


PRINT 


SEND CHARACTER TO PRINTER. 


03 13: 


6 8 




57 






PI. A 






0314: 


C9 


Kl) 


59 






C Si- 


«$8D 


CARRIAGE RETURN? 


0.<16: 


to 


01 


60 






ll Fl} 


LINE 


BRANCH IF IT IS. 


031 8: 


".0 




61 


NEXT 


RTS 






0319: 


86 


06 


62 


LINE 


INC 


COUNT 


INCREMENT LINK COUNT. 


03 IB: 


A 5 


06 


63 






LDA 


COUNT 




03 ID: 


C9 


36 


64 






CMP 


»$36 


LINE COUNT - 54V 


031F: 


DO 


F7 


65 






BSE 


NEXT 


IF NOT, THEN RETURN. 


0321: 


A 5 


06 


66 


BLANK 


l.DA 


COUNT 




0323: 


C9 


42 


67 






CMP 


S$42 


PAGE LENGTH MET? 


0325: 


FO 


OA 


68 






BEQ 


LOOP 




0327: 


E6 


06 


69 






INC 


COUNT 


INCREMENT THE COUNTER 


0329: 


A9 


8A 


70 






LDA 


•'$8A 


LOAD A LINE FEED 


C32B: 


20 


00 CI 


71 






JSR 


PRINT 


AND SEND IT TO THE PRINTER 


032E: 


38 




72 






SEC 






PJ2F: 


BO 


FO 


73 






bCS 


BLANK 




0331: 


A 9 


00 


74 


LOOP 


LDA 


P$ 00 


ZERO THE COUNTER. 


0333: 


85 


06 


75 






STA 


COUNT 




0335: 


A9 


00 


76 






LDA 


U$00 


CHANCE TO LDA f?01 TO 


0337: 


FO 


OS 


77 






BEQ 


DONE 


GET 'PAGE PAUSE'. 


0339: 


2C 


00 CO 


78 


AGAIN 


BIT 


KBD 


WAIT FOR KEYPRESS 


03 3C: 


10 


FB 


79 






BPL 


AGAIN 


BEFORE CONTINUING. 


033E: 


2C 


10 CO 


80 






BIT 


STRB 


CLEAR KEYBOARD STROBE. 


0341: 


60 




81 


DONE 


RTS 
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MR. RAINBOW 

announces... 

our all new 1980 

catalog and prompts 

you to peek at the 

latest collection of 

software and 

hardware products 

for your APPLE ll ~ 




write or call today 
for vour free 1980 
catalog. 



caraen Plaza Shopping center 

9719 Reseda Boulevard 

Norovldge. California 913M Q15JM9-S560 



Ml J 
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FOR APPLE 2 d 

ASX&AAAA 

by MARC GOODMAN 
A REAL TIME HI-RESOLUTION 
GRAPHICS GAME WITH SUPER 

SOUND EFFECTS. THREE 
DIFFERENT SKILL LEVELS- 
NOVICE. AVERAGE ("Arcade" 
difficulty") and EXPERT WHERE 
ASTEROIDS ARE ACTUALLY 
ATTRACTED TO YOUR SHIP ! 

AffiAAAA 



END ASSEMBLY 

TOTAL ERRORS: 

66 BYTES GENERATED THIS ASSEMBLY 



KSTfcRAAA 



IS NOW AVAILABLE 
IN 16K TAPE(SI4.95) 
OR 32K DISK (Si 9.95) 
FROM YOUR LOCAL 
COMPUTER STORE 
OR SEND TO: 

DEALER INQUIRIES 
INVITED 




^Adventure 

%\ff*^ INTERNATIONAL 

Box 3435 Lonqwood. Fla. 32750 (305)862-6917 



[M)^® §@®&>a 



Number 3 



"Readings in Literature 



jj 



1. Microcomputers which can use product: Apple II or Apple II + . 

2. System hardware requirements: Disk II and at least 32K of memory. 

3. System software requirements: No special requirements. 

4. Product features: The program is designed to assist in the study and memorizing of 27 well- 
known pieces of literature including prose, poems and songs. Such diverse items as "The 23rd Psalm," 
"The Bill of Rights," "Casey at the Bat," and several Shakespearean items are included. Graphics are used 
to excellent advantage to keep the various readings interesting and a "Hangman" type of "guess the 
word" system is used to assist in memorizing when necessary. 

5. Product performance: Performance is very good and the product represents a novel approach to 
learning. 

6. Product quality: The program seems very well written and no problems were encountered during 
extensive testing. 

7. Product limitations: There are no unusual product limitations. 

8. Product documentation: Very little written documentation is furnished; however, none is really re- 
quired as the introductory instructions on the disk are very thorough. 

9. Special user requirements: There are no special user requirements. 

10. Price/Feature/Quality evaluation: The price of $24.95 seems reasonable in relation to the amount 
of programming Involved and the overall high quality of the product. 

11. Additional comments: It should be noted that the disk is "locked" to prevent unauthorized copies 
and thus backup copies cannot be made. However, the manufacturer does offer to replace any disk 
which becomes damaged for a $10.00 charge. 

12. Reviewer: John B. Shanes Jr., P.O. Box 68, Mechanicsville, VA 23111. Manufactured by George 
Earl. 
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Management Planning & Decision Making 

(FOR 32K OR *t8K APPLE II WITH APPLESOFT BASIC IN ROM) 



QuihDirt 



# PRODUCTION SCHEDULING & INVENTORY CONTROL tV CAPITAL BUDGETING 

# DISTRIBUTION PLANNING 

CONGRATULATIONS... 

YOUR APPLE II COIWTER HAS JUST BEEN PROMOTED MO "MIDDLE MANAGEMENT"! 

SEE YOUR LOCAL COMPUTER STORE OR CONTACT: 

\Nyman associates 

421 SEVILLE WAY 
SAN MATEO CA 
94402 



"fr SUGGESTED RETAIL PRICE: $120 



I 



i 




BOX 120 

ALLAMUCHY, NJ 07820 
201-362-6574 

inc. 



HUDSON DIGITAL ELECTRONICS INC. 

ANNOUNCING: 



'AID' 



The Advanced Interactive 
Disassembler 
designed by 

c Progressive 

c Computer Software 

The Advanced Interactive Disassembler (AID) 
is the latest in a series of comprehensive 
HDE disk-based software development tools 
for KIM, TIM, SYM and AIM microcomputers. 

Al D is a resident, two pass disassembler that 
creates a TED compatible source file and 
assigns labels to all address references. 
Addresses external to the object file limits 
are defined as equates in the source. 

AID BUILDS SOURCE FILES FOR 
ALL YOUR OBJECT PROGRAMS 

AID will save interim files to disk thereby 
facilitating the creation of source files of vir- 
tually any object program limited only by the 
size of the program, the symbol table and the 
user defined source file buffer. 

AID is available from HDE or the following 
dealers for $95.00. 



Progressive Computer Software 
405 Corbin Road 
York. PA 1 7403 
(7171845-4954 

Johnson Computers 

Box 523 

Medina. Ohio 44256 

(216)725-4560 

Falk-Baker Associates 

382 Franklin Avenue 

Nutley. N J 071 10 

12011661-2430 



Perry Peripherals 

P O Box 924 

Miller Place. NY 1 1 764 

(516) 744-6462 

Lux Associates 
20 Sunland Drive 
Chico. CA 95926 

1916)343-5033 

A-B Computers 

1 1 5-B E Stump Road 

Montgomeryville. PA 18936 

(215)699-5826 
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FROM CASSETTE FAILURES 
PERRY PERIPHERALS HAS 
THE HDE SOLUTION 
OMNIDISK SYSTEMS (5" and 8 ") 

ACCLAIMED HDE SOFTWARE 

• Assembler, Dynamic Debugging Tool, 
Text Output Processor, Comprehensive 
Memory Test 

• Coming Soon— HDE BASIC 
PERRY PERIPHERALS S-100 PACKAGE 

Adds Omnidisk (5") to 
Your KIM/S-100 System 
► Construction Manual — No Parts 

* • FODS & TED Diskette 

^ • $20. +S2. postage & handling. (NY residents 
add 7% tax) (specify for 1 or 2 drive system) 

* Place your order with: 
PERRY PERIPHERALS 

P.O. Box 924 
Miller Place. N.Y. 11764 
(516)744-6462 



Your Full-Line HDE Distributor/ Exporter 
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D©C^(Q)©K![1I 
for the AIM 




( 
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AIM MIcroChMS with Player's and Programmes Manual, 
complete Source Listings, Object on Caaaatta Tape. 
$15.00 plus shipping. [$1.00 US/S2.00 Anywhere Baa] 
MICRO Software, P.O. Box 0502, Chelmsford, MA 01824 



Biorhythm: An AIM BASIC 
Programming Excercise 



Whether or not you believe in biorhythm theory, the pro- 
grams presented here make an interesting demonstra- 
tion and provide some useful techniques for using the 
AIM and its printer. 



P.E. Burcher 
7012 Stone Mill Place 
Alexandria, VA 22306 



The natural, regularly repeating 
rhythms of our world continually af- 
fect our daily lives. The sun and 
moon appear and disappear, the 
tides rise and fall and the seasons 
change. In all life, regular cycles are 
seen. Early in this century various 
researchers found evidence 
supporting the cyclic nature of 
human behavior. Through the years 
a body of "biorhythm" theory has 
evolved. 

Physical, emotional and intellec- 
tual biorythm cycles begin at birth 
and continue throughout life. The 
rhythm of physical capacity covers 
23 days, high during the first half of 
the cycle and low during the second. 
The first 14 days of the 28 day emo- 
tional or sensitivity cycle reflect 
cheerfulness and optimism follow- 
ed by and emotionally negative 
period. Similarly, the cycle of in- 
tellectual capacity covers 33 days. 
In the positive half cycle, individuals 
are more mentally alert and 
capable. While in the latter half, 
thinking capacity is reduced and 
concentration is more difficult. 

The day when the cycle changes 
from low to high or from high to low 
is a critical day. Accident studies 
have shown that a high percentage 
of accidents occur on critical days. 
On those days when more than one 
cycle crosses the baseline, a person 
is likely to be especially accident 
prone. 



A biorhythm chart for a person 
born April 1, 1980 is shown in figure 
1. Days when the curve is to the 
right of center are high and those to 
the left are low. Physical, emotional 
and intellectual cycles are labeled 
"P", "E", and "I" respectively. 
Critical days, zero crossings, are 
labeled "C". The program described 
in this article will provide a calendar 
and biorythm chart for the month 
you select. 

Whether or not such cycles are 
really accurate, developing a routine 
to determine and plot them is an in- 
teresting AIM BASIC programming 
exercise. I was encouraged to do 
such an exercise when Mel Evans' 
Perpetual Calendar (MICRO April 
1980, 23:27) proved such a hit with 
my family. 

To chart the cycles, the time be- 
tween birth and chart date is need- 
ed. A BASIC program to do this ap- 
peared in BYTE ("Day of The Week 
and Elapsed Time Programs", W. B. 
Agocs, September, 1979, p. 126). 
This program readily translated into 
AIM BASIC, but its 12 x 31 matrix 
occupied too much memory. Fur- 
ther, it produced an incorrect result, 
365 or 366 days too large, when 
computing for dates in adjacent 
years. 

It was possible to ues most of this 
program by substituting some sim- 
ple arithmetic for the matrix. The er- 



ror for adjacent years developed 
from the way the number of days 
was computed. For years between 
birth and chart year, 365 or 366 days 
were added to the sum of days in a 
loop which checked for leap year. 
For adjacent years event though 
there are no intervening years, the 
loop cycled once, at least in AIM 
BASIC, adding an extra year's days. 
In the program presented in this arti- 
cle, the difficulty is corrected (in 
step 401) by zeroing the extra days. 
The algorithm used in place of the 
matrix to find days in a year to a cer- 
tain date is shown below. 

Let: M = Month (a number 1 to 12) 
D = Day of month (1 to 31) 
S = Sum of days 
MC = Correction to number 
of days for months of less 
than 31 

Then: S = D +31*(M-1)-MC 

In the program the correction is 
stored in string variable, M$ 
= "003344555667". The correction 
for the month is selected by reading 
the digit corresponding to the 
month, for January and February, 
3 for March and April, etc. For leap 
years, an additional day is added for 
months after February. The calcula- 
tions are: 
MC = VAL (MID$(M$, M, 1)) 

If M > 2 then S = S + L 

Note: L = 1 leap year 
L = otherwise 
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***BIORvTHM CHfiRT*** 

***BIORVTHM CHftRTf** 
FOR: MICRO BIORHVTHM 
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FOR BIRTH RPR. 1, 1380 



You might want to check the 
calculation. Simply add the follow- 
ing: 



i; ' ft i.i D " 



Once the number of days has 
been computed, starting values for 
the biorythm sine functions are 
determined by subtracting the in- 
teger number of periods since birth. 
A natural temptation here is to com- 
pute and save all the biorythm curve 
values in a matrix for later plotting. 
Again the limited memory dictates 
computing, formatting and printing 
each day's values in sequence. 

The routine to plot the cycle 
values assembles a twenty element 
printer line in a string statement, 
one element at a time. In this case, 
space eleven was chosen as the 
center of the plot and sine values 
allowed to vary nine spaces right or 
left. Sine values are sorted after 
converting to strings and adding a 
plotting symbol (P, E, or I). Two sym- 
bols in the same slot are plotted as 
an asterisk. Date is plotted in the 
center except at zero crossing 
where "C" (for critical) is plotted. 

The program presented here is 
not as neat and pretty as it might be. 
Instructions for input data format, 
which reasonably should be includ- 
ed, have been omitted to save 
memory space. Where possible, 
"pirated programs " have been left 
intact. Some effort has been made 
to conserve memory space by reus- 
ing variables and using multiple 
statements on a line. 

The program will run with print 
control "OFF", so that only the out- 
put information is printed. The pro- 
gram listing has a number of REM 
statements for clarity. These should 
be omitted when entering the pro- 
gram, as there is insufficient 
memory. 

A sample Biorhythm produced by 
the program is shown in figure 2. 

For anyone desiring further infor- 
mation on Biorhythms. The follow- 
ing publications provide a good 
start. 

1 . Biorhythm: A Personal Science, 
Bernard Gittelson, Arco 
Publishing Company, 2nd Ed 
1976 



*BI0R¥THM CHART*** 
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2 . Biorhythm Sports Forecasting, 
Bernard Gittelson, Arco 
Publishing Company, 1977 

3 . Is This Your Day?, George 
Thommen, Crown Publishers, 
Inc., Rev Ed 1973 

1 REM BIORHYTHM WITH CALEN- 
DAR 
5 REM USER DATE INPUTS 



CHART***" 

12 PRINT! Lf- BIf > 

A C* p\ t" T .j- _ II 






35 INPUT "MftME 
48 INPUT"BIRT1 

M/'D/'V " i Ml.' Dl/ ' 

■j Li iisru; '■- n n r-. 
H/'t'"; (12; V2 



90 REM COMPUTE DAYS BETWEEN 
DATES IN SAME YEAR 












m :fv2-vi=ithens4 



725 REM READ DAY AND MONTH 


WORDS 




7 ~ 


£ -. - 7 _ .4 T '"' ~- ■ D C ~' P: 1_ * 


.+• . » i r~ \ 


T ? 


7 "? 1 


PPCTHPP ■ P'~-v T ='i T 


il i + 7 


: REfiDMN$ : NEXTI : 


R C D i L 


r. n. 


735 


. *- - . ZZ yl I r-i i- t •: ^-t "i SZHt 


7 4 6 


S = S + i 


758 


ir^ = I • H C ?*T = ¥ 2 D 


= 1 • p\ = 


hp • nnTHSifi 



825 REM COMPUTE NO. OF DAYS 
IN CHART MONTH 

Ds, M2,i>> 



440 REM DAYS IN YEAR TO DATE 
SUBROUTINE 



j. c (3 i ! — •: ! j. . L-' — V A 



.i f i j i _ . 

! . itrt ' — 



JU^UDt 



-■4 :"": i 1 









500 REM USING ZELLERS 

CONGRUENCE 

510 REM CALCULATE THE 

STARTING DAYS OF WEEK BIRTH 

DATE FIRST 



900 REM PRINT HEADER AND 
CALENDAR 



Sbki F 


'R 


INT- 


_$ 


.-; ( - :" ".- 
1 !•_; CI 
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1882 
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burn 




J Ft" 
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, nu$: 









Note: To conserve memory space, 
no input instructions have been cod- 
ed. Names should be 15 digits or 
less. Dates are input: 

Month - 2 digits 
Date - 2 digits 
Year - 4 digits 

200 REM COMPUTE DAYS 
BETWEEN DATES 



718 C=INT(V/ : 186^. 88 

?il D=INk2. S*N-. 1) 
+&+VZ-HINKVZ/4+ i) 






"i .*• __ i— T n .-*- .-• i i •- \ . Mtl^-^M^l' 
I — — D f f-. •?' '-. 7 d .•' . I"!i'* •?* — ''IS 'i - 



.834PRINT!R]GHT$< 
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lOib F**"" :Di=D-. 5 
1537 F0RI=1T07 
163S DT=I-D+1 
1939 IFKD1THENF $ = F 



ItJHB LrLsVl I nfcwr*— r 
*-§■" ii +CHR$<48+DT> 

1041 IFK6. 5THENF$= 
F*+" i; 

1042 HEXTI 

1043 PRINTiF* 

ibit LN— B 

1045 F$= iii! 

1046 F0RI=1T07 

1047 DT=DT+±:IFDT>M 

D+. 5THENEN=1 : GOTO105 

1048 D1=INT(DT/10-*-. 
85>:D2=DT-i8*Di 

1049 IFDK. 5THENF$= 
F$4- ■ 

1050_IFD1>. 5THENF*= 

1051 F$=F$+CHR$<48+ 

1052 IFKS. 5THENF*= 
F$-h !1 ,; 

185b HEX i I : PRINT ! F$ 



1655 rRINTiL* 
1058 PRINT!" 






1060 REM COMPUTE NO. OF DAYS 
SINCE LAST FULL CYCLE 



1069 REM CHG TO STRING 

■f- " p " 

1080 H$<2)=STR$<EE) 
+ " E u 

1090 H5(3)=STRf (CO 



1095 REM SORT, LOW FIRST 

1180 F=8 

Iii0 F0Rr = lT02 

1120 IFVflL(H$< I ) ><= 
VfiL<fif<I+l))THENil7e 

1130 T*=H*<I> :R$<I> 
=fis ( I +1 ) : Pit ( I H-i )=T$ 



1170 NEXT! 



1185 REM BUILD PRINT LINE 

ii yy F$ =,i " ! n = 8 
ik'yy j-UKi = lTUb 
1210 R<I)=VfiL<H*(I) 

) ■ p j = Sr' J Q i-i i j ( O * ( T ) : 1 ) 

1220 "lFR< I >=fi< I-1>T 

HENF$=LEFT$(Ff,LEN<F 

1230 F$=F$+LEFT$<DG 

i * > n d -■ '•. n '-. i .-' — ri ■-. i j. .-■ J. 

'1240 NEXT! 

1248 F=20-LEN<F*> 

1249 IrF>8THhNF$=Ff 



12^0 I $ = r'iD* ( rl I iy. 



1300 REM REPEAT FOR ADDI- 
TIONAL CHARTS 

-2 : QOTO1260 
1330 INPUT "MORE V/N 

ii . t -j- 

s i * 

1340 IFI*<>"¥°THEME 

1358 INPUT"SfiME PER 

i~ ~t fcl ! ] .: k i ii . T 4c 
3 UN TV !* .' i * 

1360 IFI$-"V"THEN0i 

=DS " RESTORE : G0T058 
1370 CLERR:G0T018 
1585 DRTHbUNDfiV, MOW 

DRV: TUESDAY; WEDNESDR 

1510 dhththursdrv, f 

RIDRV- SRTURDRV 

1515 DhThJhNURRV, FE 
ERUSRV, MRRCH, RPRIL; M 
RV, JUNE 

1520 DRTRJULV, RUGUS 

NOVEMBER, DECEMBER 



WHAT FOLLOWS IS A RUN FOR 
FRAN TARKENTON TO SHOW THE 
RESULT WITH THE "DAYS 
BETWEEN PRINT" ADDED. NOTE 
80 BYTE FREE AFTER RUNNING. 






J. !i! D . 

'; :4-: J -:" 



^ = c-_ji.j- 



1062 E 
1863 C 



=S3-IN" 






*-b I KIU ) : uu i uiiiby 

1252 IFRIGHT*<I$,1) 

: G0T01268 

1253 It="C":LC=-l 

1260 Ff=LEFT$<F*, 9- 



w\m 



***BI0RV i HM CHfiRT*** 

NRME? FRRN TRRKENTON 



1064 REM PLOTTING LOOP COM- 
PUTE P/E/l VALUES 

1066 PP=llH-INT(9*<S 
IN<R*p/'23)+. 05>) 

1067 EE=il+INT<9*<S 



1 ti fe o L- L- — 1 1 + 1 N T '■. 9 : ^ ', b 



j ft f p * f; / 7 2 '} + . 05)) 



IfiibO PKiN ! ! F* 

1266 P=F'+i : E=E+i : C= 
C+i 

1275 PLINTH*, TRB<6 
0), '•'■ " 



1290 I *=RIGHl J(I J, L 
En '■. i $ ) -1 .5 : lu=lEn k i$ ) 



CHRPT DRTE 14/V? 1 



1 •'" 1 / 1 9 7 1 

FRE i :0)= 426 



29:54 
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Classified Ads 



OSI OS 65-D UTILITY DISKETTE 
Renumber, Disassembler, Memory 
Dump, Improved CREATE, single 
I disk Copy, disk Verify, etc. 
Diskette and manual $30.00, TX 
add 5 %. Catalog free with SASE. 
GASIIght Software 
3820 Byron 
Houston, TX 77005 

SYM-1 books by Robert A. Peck 
Monitor Theory Manual $8.00. 
Hardware Theory Manual $6.00. 
SYM/KIM Appendix to First Book 
of KIM $4.25. Send SASE for 
details. 

Datapath 
P.O.Box 2231 
Sunnyvale, CA 94087 



Programmer Fatigue? 
SYM-Bug/Monex adds 15 com- 
mands to SYM's repetoir, in- 
cluding an interactive trace/- 
debug. Cassette @$200 or $3800, 
$15.95. 2716 (5V) $F000— $F7FF, 
$39.95. Commented source listing 
$9.95. Custom assembly add 
$2.00. SASE for more information. 

J. Holtzman 

6820 Delmar 203 

St. Louis, MO 63130 

(314) 863-5209 

INTEGER PASCAL SYSTEM 
for the Apple II. Compiler, inter- 
preter, and translator Included for 
$65.00. Produces 6502 code pro- 
grams for high speed. 48K and 
Disk required. Send for free infor- 
mation. 

M & M Software, Co. 

380 N. Armando #Z-19 

Anaheim, CA 92806 

PROM BLUES? 
1.25K Program does work for you! 
Verify, erase, program, copy 
PROM to RAM, exit. For any 6502. 
Loads at $0200. Listing and in- 
structions: $9.95. Cassette: $2.00. 
(ASK family only) Custom 
assembly: $2.00. All first class 
PPD cont. USA. Foreign add $2.00. 

Jeff Holtzman 

6820 Delmar - 203 

St. Louis, MO 63130 



J 



PET MACHINE 
LANGUAGE GUIDE 
Comprehensive manual to aid the 
machine language programmer. 
More than 30 routines fully detail- 
ed. Reader can put to immediate 
use. NEW or OLD ROMs. $6.95 
plus $.75 postage and handling. 
VISA/Mastercharge accepted. 

Abacus Software 

P.O.Box 7211 

Grand Rapids, Ml 49510 

APPLE II SHAPE TABLE EDITOR 
Makes shape table construction 
and editing simple. Eleven editing 
commands allow the user to 
create shapes, modify existing 
shapes, save and retrieve shape 
tables for use with the DRAW, 
XDRAW, and SHLOAD commands 
of APPLE II BASIC. Runs under 
firmware Applesoft floating point 
BASIC with 32K RAM. On cassette 
tape with user's manual. $9.95. Or 
$1.00 for manual only (refunded 
with purchase. 

Small Systems Software 
P.O. Box 40737 
Washington, DC 20016 

APPLE GRAPHIC AID SHEETS 
LO RES 8.5" x 11" 50 sheets $2.00 
HI RES 22" x 17" 20 sheets $6.00 
Please add $1.00 shipping. 
Boardwalk Products 
225 South Western Avenue/M 
Los Angeles, CA 90004 

OSI TREK FANS! 
Don't just WATCH Trek, PLAY it, 
with VIDEOTREK, the fast action 
graphics arcade version of Star- 
Trek. Klingons, Phasers, 
Torpedoes, Black Holes and 
Doomsday Machine! 8K $9.95 
postpaid. Write for list of others. 

Bob Retelle 

2005 Whlttaker Road 

Ypsllantl, Ml 48197 

C1 P/Superboard Intelligent Ter- 
minal Program transmits data 
from keyboard or cassette and 
stores received data onto 
cassette. Runs in 4K, selectable 
parity, stop bits; full/half duplex. 
Unique feature-user definable 
keyboard configuration. Lets you 
tailor your keyboard. $24.95 for 
cassette and manual. Requires 
RS232 mod. 

Charles Shartsis 
9308 Cherry Hill Rd.812 
College Par, MD 20740 

Continued on page 71 



MICROPROCESSORS IN 
MEDICINE: THE 6502 

MICRO is pleased to present here the first column in a contin- 
uing series by Jerry W. Froelich, M.D., on the 6502 
microprocessor in medicine. The author provides his own in- 
troduction. 

Soon after the introduction of commericial computers, the 
imaginative physician and engineer prophesied and advocated 
the extension of computers into medicine. The initial attempts to 
bring computers into the hospital only made it as far as the 
business office. Once computers became fully accepted in the 
business side of the hospital, various clinical applications 
were tried. One, in the clinical laboratory, was to process the 
vast amount of information generated by laboratory pro- 
cedures. Another was to analyze electrocardiograms (EKGs), 
which seemed like "simple" signal analysis. Still another was 
monitoring, where the computer's "watchful eye" records, in- 
terprets, and reacts to deviances from preset parameters. 

These applications met with various problems such as that 
of "technology transfer" (the man-machine interface), and size 
and cost limitations. One of the initial obstacles to widespread 
acceptance of clinical computer technology was the lack of 
collaboration between engineers and physicians. 
Sophisticated design did not translate, necessarily, into 
clinically practical information. 

During the last decade, there has been maturation of our 
understanding, both of the technology transfer process and of 
the technology appropriate for medicine. During that same 
period, microprocessors became sufficiently economical, 
powerful, reliable and available to be useful and efficient for a 
broad range of medical applications. 

Allow me to introduce myself. I first learned about com- 
puters in the late 60's by programming business applications 
on an IBM 1130, no small feat. The fruits of this labor financed 
my undergraduate education. At this time, I became interested 
in applying computers to the monitoring, modeling, and 
prediction of shock states in critically ill patients. In medical 
school, I began programming real-time applications in 
neurophysiology and nuclear cardiology. The bulk of this work 
was performed on the PDP 8, 11, and 12. 

During my last year of medical school, I spent the summer at 
the National Institutes of Health (NIH) as a visiting scientist, to 
learn the many applications of computers to medicine at the 
Institutes. During this time, I helped implement real-time 
analysis of electrocardiograms in the post-surgical intensive 
care unit. It was at NIH that I first became familiar with 
microprocessors in medicine. Scientists there were 
fabricating "intelligent" monitoring devices such as pre- 
processors for EKGs, blood pressure measurements, and fluid 
ouput. 

Currently, I am a clinical fellow at Harvard Medical School 
and work in the Radiology-Nuclear Medicine Division at the 
Massachusetts General Hospital in Boston. In our department, 
we have various applications on computers ranging from the 
largest to the smallest microprocessors. I myself have a PET 
computer, a 6800 microprocessor system (TVBUG), and access 
to an APPLE system. 

With this introduction behind us, I would like briefly to cover 
what this column will accomplish. Because MICRO is 
dedicated to the 6502, I would like to structure the column so 
that an overview of a computer application in medicine in- 
cludes an in-depth description of a specific 6502 application. I 
hope that this column can be a forum with reader comments 
and suggestions. What I need to know from you the reader is 
how much depth is desired, if reviews of current literature 
would be helpful, and how much technical information is 
desired. Please write to me at the address below. 

The second column will discuss the use of microprocessors 

in medical education and will include a description of a 

specific system for teaching physicians and technologists 

about nuclear cardiology and nuclear medicine. 

Jerry W. Froelich M.D. 

9 Brown Place 

Woburn, MA 01801 
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Electric 
I \*forks 



Skylcs Electric Works 

231 E South Whisman Road 
Mountain View. CA 94041 



DISCOUNT DATA PRODUCTS 

BASF 5V DISKETTES: 
$34.50 PER BOX OF 10 

HIGHEST QUALITY DISKETTES AT A 
BARGAIN PRICE! LABELS AND WRITE- 
PROTECT TABS INCLUDED. 

VINYL DISKETTE HOLDERS 
FOR NOTEBOOKS 

THE IDEAL WAY TO STORE DISKETTES. EACH 
VINYL PAGE HOLDS TWO DISKETTES AND IN- 
CLUDES A POCKET FOR EACH DISKETTE'S LABEL. 
SAFELY KEEP UP TO 40 DISKETTES IN A SINGLE 
1" 3-RING NOTEBOOK! 

$4.95/SET OF 10 

MARKETING YOUR OWN SOFTWARE? 
DDP OFFERS DEALER & SOFTWARE HOUSE 
DISCOUNTS ON NOT ONLY THE ABOVE 
ITEMS. BUT ALSO THE FOLLOWING 

PRODUCTS: 

9" x 12" ZIP-LOCK BAGS FOR PACKAGING & 
DISPLAY OF SOFTWARE. 
CORRAGATED MAILERS TO SHIP TO USERS 
OR DEALERS! 
SEND FOR FREE INFORMATION AT: 

DISCOUNT DATA PRODUCTS 

P.O BOX 19674-M 

SAN DIEGO. 92119 

(ADD $1 00 SHIPPING/HANDLING CHARGE TO ALL ORDERS ) 



Hexadecimal Printer 



This simple program permits the user to specify the 
limits within which he wants the APPLE II disassembler 
to operate. 



LeRoy Moyer 

Route 9, P.O. Box 236 

Charlottesville, VA 22901 



When using the disassembler in 
the Apple II to print out machine 
language code, one normally types 
in the starting address and then a 
number of L's. There are two pro- 
blems with using this method to 
print out a machine language pro- 
gram. The first is that if the machine 
language program does not happen 
to be a multiple of 20 instructions, 
there is probably going to be a col- 
lection of unwanted garbage printed 
at the bottom of the desired 
machine code. The second problem 
occurs when the program being 
printed is fairly long. Does one type 
in 50 or 51 L's to get all of the 
desired code? The program 
presented here solves both of these 
problems by decoding an outputing 
the disassembled machine 
language code that lies between 
two hexidecimal addresses. 

After loading the program, using 
it is very easy. First, turn on the 
printer with a control P and then 
type 800G (return). The screen will 
clear and prompt you with the 
header "STARTING ADDRESS". 
Enter the hexidecimal address of 
the first instruction to be decoded 
and then hit return. A similar promp- 
ting question will be asked for the 
ending address and after entering 
the ending address the program will 
start outputing the disassembled 
code beginning at the starting 
address and continuing until the 
ending address. 

The code presented here is 
transportable in that only two 
addresses (4 bytes) need to be 
changed to relocate the program 
anywhere in memory. These loca- 
tions are the addresses for the data 
that prints out the program's two 
lines of text. Data for this text is 
stored starting at lines 570 ($86B) 



0800 

0803 
9805 
0808 

0800 

080C 

080F 

0810 

0812 
0815 
0817 
0810 
081C 
0S1E 
0820 
0822 
0825 
0827 
082R 
082C 
082E 
0831 
0832 
0834 
0837 
0839 
Q83C 
083E 
0840 
8842 
0844 
0847 
084fl 
084C 
0S4D 
034F 
0851 
0853 
0855 
0857 
0859 
085ft 
085C 
085E 
0860 
0862 
0864 
0867 
086ft 



2058FC 

H200 

BD6B08 

F008 

0980 

20EDFD 

E8 

D0F3 

206FFD 

0880 

20H7FF 

H53E 

853ft 

A53F 

8538 

298EFD 

0288 

BD7D38 

F008 

0980 

20EDFD 

E8 

D8F3 

206FFD 

FI000 

20ft7FF 

ft53E 

85FE 

ft53F 

85FF 

203EFD 

20D0F8 

E62F 

18 

H53fi 

652F 

853ft 

R53B 

6900 

853 B 

38 

ft53ft 

E5FE 

H53B 

E5FF 

98E3 

288EFD 

203EFD 

60 



0010 
0020 
0030 
0040 
0050 
0068 
0070 
0080 
0090 
0100 
0110 
0120 
0130 
0140 
0150 

0160 
0170 

HI 80 
01 90 
0200 
0210 

0220 
0230 

0240 

02SS 

0260 

0.'70 

0280 
0290 

0300 
0310 

0320 
0330 
0340 
0350 
0360 
8370 
0380 
0390 

0400 
0410 

0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 

0500 
0510 

0520 
0530 
0540 
0550 
0560 



DECODE BETWEEN ADR 

FINfl DL 00FE 
flPfla DL 003E 
LENG . DL 002F 
hF'PC DL 003 ft 



STAR 
DBR2 



DBftl 



DBH4 



DBft3 



D6fl5 



JSR 

LDX 
LDft 
BEG 
ORfl 
JSR 
I NX 
BNE 
JSR 
LDV 
JSR 
LDft 
S fft 
LDft 
STfl 
JSR 
LDX 
LDft 
BEQ 
ORfl 
JSP 
I NX 
BNE 
JSR 
LDV 
JSP 
LDft 
STft 
LDft 
STft 
JSR 
JSR 
INC 
CLC 
LDft 
ADC 
STft 
LDft 
ADC 
STft 
SEC 
LDft 
SBC 
LDft 
SBC 
BCC 
JSR 
TSR 
RTS 



*FC58 

000 

titi. :■: 

DBftl 

080 

SFDED 

DBflC 
*FD6F 

000 

*FFft7 
*flpfl2 

HftPPC 

♦RPH2+01 
*flPPC+81 
*FD8E 

000 

TTT2. X 
DBH3 

080 
*FDED 

DBR4 
SFD6F 

000 

*FFR7 

*ftPH2 

♦ FINfl 

♦ftpft2+01 

♦FINR+01 

*FD8E 

*F8D0 

*LENQ 



CLEAR SCREEN 
OUTPUT FIRST HEADER LINE 
"STARTING ADDRESS" 



: KEYBOARD INPUT OF STARTING ADRRESS 

CHANGE TO HEXIDECIMAL ADDRESS 
MOVE HEXIDECIMAL ADDRESS TO 
APPC ($3A) 



PRINT LINE FEED 
PRINT SECOND HEADER LINE 
"ENDING ADDRESS" 



KEYBOARD INPUT OF ENDING ADDRESS 

CHANGE TO HEXIDECIMAL ADDRESS 
MOVE HEXIDECIMAL ADDRESS TO 
FINA ($FE) FINAL ADDRESS 



PRINT LINE FEED 
DISASSEMBLE ONE LINE 
INCREMENT BYTE FOR LENGTH 



*ftppr: :ADD LENGTH OF INSTRUCTION TO 
*LENG : ADDRESS THAT IS POINTER FOR 
*ftPPC :0P CODE TO BE DISASSEMBLED 
*ftPPC+01 

000 

*fiPPC*01 



*APPC 

*FINft 

*flPPC+01 

♦FINft+01 

[■BR5 

*FD8E 

tFDSE 



: SUBTRACT FINAL ADDRESS TO SEE IF 
: THE END HAS BEEN REACHED 



PRINT LINE FEED 
PRINT LINE FEED 
RETURN TO MONITOR 
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and 610 ($87D) in the program listing 
and this data is used in lines 100 
($806) and 250 ($828) respectively. 

Several APPLE monitor sub- 
routines are used in this program 
and two of them deserve some com- 
ment. The first is the GETNUM 
($FFA7) subroutine that converts a 
number stored as ASCII characters 
in the input buffer ($200), indexed by 
the Y register, into a two byte hex- 
idecimal number. This routine con- 
verts ASCII characters until it en- 
counters a character that is a non- 
hexidecimal number. A carriage 
return ($8D) is used in this program 
for the terminator. The resulting 
hexidecimal address is stored at 
location A2L ($3E) and A2H ($3F) in 
the usual low byte, high byte order 
for addresses required by the 6502. 

The second routine that deserves 
some comment is the INSTDP 
($F8D0) routine. This routine 
disassembles an instruction and 
outputs it to the screen. The 
address that is used to direct the 
subroutine to the op code to be 
disassembled is stored in PCL ($3A) 



0866 535441 6570 TIT1 HS 5TRRTX' : DATA FOR FIRST HEADER LiNt 

B86E "52544'-' 

'3871 4E4720 05813 RS NG ROD 

13874 414444 

8877 524553 6590 *S RE55 ' 

087H 5 : . •" 

087C 00 3600 US 00 

087D 0D 0610 TIT2 . HS 0D 

087E 454E44 @620 . HS 'ENDING 

0881 494E47 

9834 204144 0620 . fis ' RDDRE 

13887 443245 

088fl '_■ 5~.j0 0640 fiS SS ' 

088D 00 0650 HS 00 

0660 END EN 



:DATA FOR SECOND HEADER LINE 



and PCH($3B). After returning from 
INSTDP, a number that is one less 
than the length of the instruction is 
stored in location LENGTH ($2F). 
The address in the pointer ($3A, $3B) 
is not changed by INSTDSP and 
hence the length of the instruction 
needs to be added to the pointer to 
get to the location of the next op 
code (lines 410 to 470 in the program 
listing). 

If you do not desire to have the in- 
itial lines of text printed out on your 
printer then one should insert a 
printer turn-on routine between lines 
380 and 390 of the assembled pro- 



gram listing. Hopefully this routine 
will be useful in making your 
machine language print-outs look 
neater in the future. 
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SIRIUS SOFTWARE is proud to announce that SYNERGISTIC SOFTWARE 

is now a distributor for us and is carrying the following products in stock: 

E-Z DRAW. It started as the best graphics editing package available for the APPLE and with our continuing 
support it is going to stay the best. Human engineered for ease of use and a tutorial intended to be used by 
computer novices. Still only $34.95. E-Z DRAW requires a 48K APPLE with Applesoft in ROM or a Language 
System. Written by Jerry Jewell and Nasir/Gebelli. 

STAR CRUISER — The ULTIMATE ACTION game! A real time hi-res action game with sound, action and 
suspense. Finally a game that requires fast reflexes, coordination and strategy. These critters actually chase 
you. A game for all ages and priced right at $24.95. This game runs under 13 or 16 sector format with 32K 
RAM. Written by Nasir/Gebelli. 

BOTH BARRELS includes two games on the same diskette. DUCK HUNT is the traditional hunt from the blind, 
complete with dogs to retrieve the ducks and even an occasional dog fight to liven up the action. Hi-res, of 
course. HIGH NOON has you pitted against an entire town of BAD GUYS. They'll attack from doorways, win- 
dows, and even rooftops. Be quick or be dead. This has some of the most Interesting graphics effects you'll 
see on the APPLE. Nine levels of play, one to match any age group. These games have great action, great 
graphics, and great sound effects. What else could you ask for? BOTH BARRELS requires 48K with Applesoft 
in ROM. Written by Nasir/Gebelli. 



SIRIUS SOFTWARE 

1537 Howe Avenue §106 
Sacramento, CA 95825 
(916)920-8981 



SYNERGISTIC SOFTWARE 

5221 120th Avenue S.E. 

Bellevue, WA. 98006 

(206)641-1917 



APPLE, Applesoft and Language System are products of Apple Computer, Inc. E—Z DRAW and DUCK HUNT include 
character generation by Ron and Darrel Aldrich and fonts by Ted Cohn and Lawrence You. 

The products listed are all copyrighted © 1980 by SIRIUS SOFTWARE. ALL RIGHTS RESERVED. 



Programming with Pascal 



This overview of PASCAL discusses the features of the 
language and provides a sample program illustrating its 
structure and ease of use. 



John P. Mulligan 

P.O. Box 3461 

Van Nuys, CA 91407 



One of the first things that I realiz- 
ed after purchasing my APPLE II 
computer system, was that pro- 
gramming in BASIC was really a 
pain. Although BASIC is very 
suitable for programming games 
and relatively simple programming 
systems, I feel that its usefulness 
declines in direct proportion to the 
complexity of the application. There 
are a number of important reasons 
for this. 

First of all, it is very difficult to 
program in BASIC using Structured 
programming techniques. Struc- 
tured programming is a concept 
that has become widely accepted 
over the last few years as a method 
for simplifying program design and 
coding, and any subsequent 
maintenance. Basicly, the program 
is designed by continuously break- 
ing the main problem down into 
smaller problems, and then by 
writing one program module to 
solve each of the smaller problems. 
The modularization additionally 
serves to enhance readability and 
logic design. 

Another aspect of programming 
that helps in understanding logic 
flow is the concept of "prettyprint- 
ing", if I may borrow a term. This is 
simply writing the program in such a 
way as to promote ease of reading, 
and to indicate logic flow by inden- 
tation. APPLE'S BASICS are 
notoriously difficult to read, 
although this is understandable 
because the BASIC Interpreter 
needs to parse the text directly at 



execution time and so needs the 
text formatted in a specific manner. 

The last, and for me, most impor- 
tant fault that I see with BASIC is 
that it is tediously slow. This again 
is due to the aforementioned inter- 
pretation of the BASIC textual 
statements. In some applications, 
this is quite acceptable, but for high 
volume processing, this becomes in- 
creasingly important. Until recently, 

I overcame this factor by doing most 
of my programming on the APPLE II 
in Assembly language. 

Now that I have aired my 
grievances about BASIC, let's turn 
to Pascal. Pascal was first 
developed by Niklaus Wirth, who 
tried to develop the perfect program- 
ming language. This language is ac- 
tually based on the ALGOL 60 pro- 
gramming language which is, like 
Pascal, a procedure oriented 
language. The language developed 
by Wirth was named after the 
French mathemetician Blaise 
Pascal, and was designed as a 
language to teach programming 
concepts. Although originally used 
on minicomputer systems, it has 
been shown to be excellent for 
microprocessor-based systems as 
well. 

The nice thing about Pascal is 
that it has all of those traits that 
BASIC lacks, and more. The APPLE 

II implementation of U.C.S.D. Pascal 
is a very excellent programming 
system that is convenient, 
sophisticated and quite powerful. 



However, rather than concentrating 
on the operating system and the 
program development aspects of 
the system, I would like to talk 
about Pascal itself. 

First of all, it is a compiler 
language. The program text is input 
to the compiler, and a Pascal P-code 
object module is generated that is 
executed by the Pascal P-machine 
emulation program. This speeds up 
program execution at least ten 
times over an equivalent BASIC pro- 
gram. Speed advanages are not the 
only benefit to program compila- 
tion. The program text can be writ- 
ten free form, which promotes the 
use of prettyprinting, and this in 
turn increases readability. 

For example, I have written a pro- 
gram that sorts an array of integer 
numbers using the QUICKSORT 
algorithm. This is one of the most ef- 
ficient sorting techniques that has 
been yet discovered, but it is 
somewhat confusing at first glance. 
Essentially, the array is sorted by 
the following means: First, the array 
is split into two halves and a routine 
is called for each half which first 
estimates a value that is in the mid- 
dle of the range. When this is done, 
the array section being operated on 
is scanned and all values less than 
or greater than the estimated value 
are placed on their respective half of 
the array section. When this is ac- 
complished, the array section is 
split and the procedure is again 
called. 
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Look at the program example, 
TESTSORT. The first thing to 
remember about Pascal programs is 
that 'first is last'. In other words, any 
variable, constant, or procedure 
must be defined before it is referred 
to. That is why the executable 
statements for any program or pro- 
cedure are the last statements in 
that program or procedure. 

A procedure is basicly a program 
subroutine that is, or should be ac- 
complishing a discrete function 
within the program. Any procedure 
may also be composed of one or 
more procedures. In the example, 
procedure PRINT is a stand-alone 
procedure, while procedure SPLIT is 
constructed using four sub- 
modules, SWITCH, BUBBLE, 
MOVEUP and MOVEDN. 

Notice also that variables and 
constants are always declared prior 
to their use at the beginning of the 
program or procedure. Additionally, 
these data areas are global to the 
lexical level of the program at which 
they are defined. In other words, the 
constant MAXMEMS is available to 
any statement in the program 
because it is defined at the highest 
level, but the variable HOLD can on- 
ly be accessed from within pro- 
cedure SWITCH. 

This feature of defining variables 
for a sub-module allows the techni- 
que of recursion to be used. Simply 
put, this means that a procedure is 
able to call itself as a subroutine. 
This is in fact what the procedure 
SPLIT is doing. By using recursion, 
the programmer can keep the 
coding simple, and yet write ex- 
tremely efficient programs. In this 
example, SPLIT is initially called 
from the main program logic, and 
the value and the variable ACT- 
MEMS are passed as parameters. At 
the end of the SPLIT processing, the 
size of the array segment being 
manipulated is evaluated. At this 
point, the array is broken into two 
halves and the procedure is called 
again for each half. This process 
continues until the array segment to 
be passed to the SPLIT procedure is 
twelve items or less. At this point, a 
simple bubble sort is called for effi- 
ciency reasons and the return is 
made from the subroutine call. 

This use of recursion is possible 
because new and unique variables 



are generated for each recursional 
level. This allows the variables to be 
at the proper value when the return 
to the next higher level is com- 
pleted. Because of this , however, a 
lot of memory is gobbled up in the 
process and there is an effective 
limit to the number of recursion 
levels possible. In the case of the 
APPLE, a minimum of six words are 
used at each level in addition to any 
variables used, and each word is 



considered by the P-machine to be 
16 bits. For this reason, the example 
is limited to 285 members in the ar- 
ray. 

The use of this recursion techni- 
que is what makes the QUICKSORT 
algorithm so efficient, however. The 
first sort that I wrote in Pascal was a 
simple bubble sort that took about 
70 seconds to sort 100 items in the 
array. Using QUICKSORT, this same 
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(**L PRINTER:*) 
PROGRAM TESTSORT; 

(*»*«H»**W***«W*»»*»****«***** ) 

(* ♦) 

(* QUICKSORT ARRAY OF INTEGER *) 
(* li 

( ««*«**»♦**«»«**««**«**«** ) 
{* } 



FUNCTION PADDLE(SELECT: INTEGER): INTEGER; 

FUNCTION BUTTON (SELECT: INTEGER): BOOLEAN; 

PROCEDURE TTL0UT( SELECT: INTEGER; DATA: BOOLEAN); 

FUNCTION KEYPRESS: BOOLEAN; 

FUNCTION RANDOM: INTEGER; 

PROCEDURE RANDOMIZE; 

PROCEDURE N0TE(PITCH,BURATI0N: INTEGER); 

IMPLEMENTATION 

USES APPLESTUFF; 

CONST MAXMEMS = 284; 



VAR 



INTERACTIVE; 

INTERACTIVE; 

ARRAYC0.. MAXMEMS] OF INTEGER; 

INTEGER; 

INTEGER; 

CHAR; 



OUT 

CON 

NUN 

ACTMEMS,IY 

P,D,IX 

CHRCTR 

PROCEDURE PRINT(TEXT:STRING); 
(«**»*»*«*«***««*«***«♦***♦* ) 
(» *) 

(* PRINT THE INTEGER ARRAY *) 
(» *) 

( **««**«*****««*«**«*«****** ) 
VAR DUCTS : INTEGER; 

BEGIN 
PAGE(OUT); 
HRITELN(OUTJEXT); 
WRITELN(OUT); 
WRITELN(OUT); 
IX := 0; 
CTR := 0; 
REPEAT 
HRITEtOUT,' ":4,NUM[IX]:6); 
IX := IX + t; 
CTR := CTR + 1; 
IF CTR = 12 THEN 
BEGIN 

CTR := 0; 
WITELN(OUT) 
END; 
UNTIL IX > ACTMEMS; 
WRITELN(OUT); 
END; 
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1 PROCEDURE SPL1T(X,Y: INTEGER); 
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THE QUICKSORT METHOD. *) 
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3 VAR F,L,HID ! INTEGER; 
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0DDPASS : BOOLEAN; 
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PROCEDURE SHITCH(SU1.SU2: INTEGER); 
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VAR HOLD : INTEGER; 
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HOLD := NUMSM]; 
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NUHtSMID := MME9UZ11 
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NUMCSU2] := HOLD 
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PROCEDURE BUBBLE(BB1,BB2: INTEGER); 
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VAR Z,X : INTEGER; 
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FOR Z := BB1 TO (BB2 - 1) DO 
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FOR X := (Z + 1) TO BB2 DO 
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IF NUHIZ] > NUfim THEN SWITCH(Z.X); 
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PROCEDURE MOVEUP; 
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BEGIN 
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0DDPASS := FALSE; 
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REPEAT 
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IF NUMLF1 >= NUMCL] THEN 
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SWITCH(F,L); 
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F := F + 1! 


102 


1 


6 


4 


51 


HID := LI 
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EX IT (MOVEUP) 
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L := L - l; 
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UNTIL NOT (L > F); 
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END; 
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PROCEDURE H0VEDN; 
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0DDPASS := TRUE; 
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IF NUM.] <C NUMEF] THEN 
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SMITCH(F,L); 
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L := L - 15 
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MID := F; 
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EXIT(MOVEDN) 
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F := F + 15 
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UNTIL NOT (L > F); 


124 


1 


7 





81 


END; 



array will be sorted in about five 
seconds. The maximum of 285 
elements is sorted consistently in 
16 seconds. Even though a machine 
language sort would run circles 
around these figures, try doing 
some sorts in BASIC. I'm not even 
sure that QUICKSORT could be writ- 
ten in BASIC. 

There is one last feature of the 
U.C.S.D. Pascal system that I feel 
merits a lot of attention. With this 
system, machine language 
subroutines can be linked into and 
called from Pascal host programs. 
These routines are essentially 
members of Partitioned Data Sets 
(PDS) that are called UNITs. These 
UNITs each have a unique name, 
and up to 16 of these UNITs may 
reside on any one of a number of 
subroutine libraries that the pro- 
grammer can generate. In the 
TESTSORT program, I wanted to use 
the routines NOTE and RAN- 
DOMIZE, which are machine 
language procedures that are used 
to manipulate the APPLE'S speaker 
and in gererating random numbers, 
respectively. These routines reside 
in An APPLE supplied UNIT called 
APPLESTUFF. This unit is included 
in the program, and at the end of 
compilation, this UNIT is 
automatically linked in from the 
system library. Any of the functions 
and procedures listed at the begin- 
ning of the program above the state- 
ment, IMPLEMENTATION are now 
available to the Pascal host pro- 
gram. 

In this article I have tried to 
highlight some of the main features 
of this very professional software 
system as simply as possible, and 
in doing so, have tried to indicate 
the usefulness of this product 
without being tedious. Pascal is an 
exciting development on the 
microcomputer horizon which will 
allow the serious software analyst 
to develop professiona applications 
for microcomputer systems. Oh yes, 
there is only last critical point that I 
have neglected to mention. Pro- 
grams written in U.C.S.D. Pascal 
can be run on any computer system 
using the U.C.S.D. Operating 
System, and there are a lot of 
micros out there in addition to AP- 
PLE now using this operating 
system. Think about it for a mo- 
ment. The implications are truly 
amazing. 
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96 (*W) 

96 [ HIHIHMIIIHIIIimiHHm ) 

(* t) 

[• MAIN LOGIC FOR SPLIT *) 
(* *) 

( HHHHHHHHHHHHH HH mill H HHH ) 

BEGIN 
F := X; 
3 L := Y; 

MID := ((F + L) DIV 2); 
IF NUMCFI < NUHiMID] THEN 

SWITCH(F,MID)5 
IF NUHCF3 > NUMIL3 THEN 

SWITCH(F.L); 
ODDPASS := TRUE; 
WHILE L > F DO 
IF ODDPASS THEN 

MGvEUP 
ELSE 

MOVEDN; 
IF (MID - X) > 12 THEN 

SPL1T(X,MID> 
ELSE 

BUB6LE(X,MIB); 
IF <Y - MID) > 12 THEN 

SPLIT(MID,Y) 
ELSE 

BUBBLE(MID,Y)! 
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124 
128. END; 

142 (*$P*i 

1 42 ( ***«»*«»***»**«*»******««« j 

142 (« *) 

142 (* PROGRAM TESTSORT LOGIC ») 
142 (* ») 

1 42 ( «*****«**»******♦*»*******«*« ) 

BEGIN 
RESET J OUT, 'PRINTER:'); 
RESET (CON, 'CONSOLE:'); 
PAGE (CON); 
G0T0XY(05,06); 

G0TQXY(05,07) 

60T0XY(05,08); HRITEC* 

G0T0XY105.09); HRITEC* 

G0T0XY(05,10); 

60T0XY(05,11); 

G0T0XY(26,09); 

UNITCLEAR(l); 

READLN(ACTMEMS); 

RANDOMIZE; 

FOR IY := TO ACTMEMS DO NUHIIY] := (IY + 

GOT0XY(06,13)i WRITECPRINT UNSORTED ARRAY (Y/NP '); 
UNITCLEAR(l); 
READ(CHRCTR); 
IF CHRCTR = 'Y' THEN 
BEGIN 

WRITE( 'START PRINTER AND HIT ANY KEY '); 
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WRITE! '***«*****4****«*4****#M«HHHf»' ) 

WRITE ('"♦ f) 

INPUT NUMBER OF ELEMENTS »') 
LESS THAN 285: »') 

WRITE! '* »') 

HRITE( 'W HUHimi nm in mi mm t * ) 



RANDOM MOD 3452); 



758 END. 



G0T0XY(O6,14).; 

UNITCLEAR(l); 

REflD(CHRCTR); 

GOTOXY(OOtOO); 

PRINT ('BEFORE THE SORT -') 
END; 
G0T0XY(12,16); WRITECSORT INITIATED ')! 
P := 18; 
D := 100; 
NOTE(P.D); 
SPLIT (0, ACTMEMS); 
P : = 18' 
NOTE(P,D); 
PAGE(CON); 

G0T0XY(05,14); WRITEl 'START PRINTER AND HIT ANY KEY '); 
UNITCLEAR(l); 
READ (CHRCTR); 
PRINT ('AFTER THE SORT -') 



APPLE 
BUSINESS 
SOFTWARE 

GENERAL LEDGER 

If you are a business person who is looking for 
ultimate performance, take a look at this out- 
standing General Ledger package from Small 
Business Computer Systems. 

Our package features six digit account 
numbers, plus thirty-one character account 
names. We have ten levels of subtotals, giving 
you a more detailed income statement and 
balance sheet with up to nine departments. Either 
cash or accrual accounting methods may be used. 
The cash journal allows a thirty-three character 
transaction description and automatically cal- 
culates the proper off-setting entry. You may 
print the balance sheet and income statement for 
the current month, quarter, or any of the pre- 
vious three quarters. Also, this year's or last 
year's total are included on the income statement, 
depending on the current month. 

There is virtually no limit on entries, since you 
may process them as often as you like. Two 
thousand (1,000 from GL; 1,000 from any exter- 
nal source) can be processed in one session. 

ACCOUNTS RECEIVABLE 

Sound business management requires you to 
keep up-to-date reports regarding the status of 
your accounts receivable. 

Now, from the same company that revolu- 
tionized accounting on the Apple II computer, 
with their conversion of the Osborne/ McGraw- 
Hill General Ledger program, you may now 
obtain the Accounts Receivable package you 
have been waiting for. 

Our package allows you to assign your own 
alpha-numeric customer code up to six char- 
acters. Date of the last activity, as well as 
amounts billed this year and last year are main- 
tained. This Accounts Receivable system main- 
tains six digit invoice numbers, six digit job 
numbers, invoice amount, shippingcharges, sales 
tax (automatically calculated), total payments as 
well as progress billing information. You may 
enter an invoice at any time; before it's ready for 
billing, after you have billed it, and even after it's 
paid. This package also prints reports which list 
the invoices you have not billed yet, open items, 
paid items, and an aging analysis of open items. 

In the final analysis, making your bookkeeping 
easier is what our software is all about. With our 
General Ledger package you can format your 
own balance sheet and income statement. 
Department financial statements may be for- 
mated differently. You have complete freedom to 
place titles and headings where you want them, 
skip lines or pages between accounts and 
generate subtotals and totals throughout the 
reports — up to ten levels if you need them. Ac- 
counts Receivable is designed to provide you 
with complete up-to-date information. The 
program will print customer statements as well as 
post invoice amounts to any of the accounts 
maintained by our General Ledger package. 
These packages will support any printer/inter- 
face combination. General Ledger requires 1 10 
columns. Accounts Receivable requires 130 
columns. 

Suggested Retail: 

Individually Si80.00 

Together $330.00 

SMALL BUSINESS COMPUTER SYSTEMS 

4140 Greenwood 

Lincoln, Nebraska 68504 

(402) 467-1878 
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Legal Note: Computers and the Law 

The Computer/Law Journal has 
just issued a "Call for Papers" for a 
special two-issue set entitled "Law 
and Information Policy" to be 
published in early 1981. 

Papers are sought in all areas of 
the information process, from the 
legal aspect of fact-gathering, to in- 
formation storage, retrieval and 
transmission. Topics include inter 



alia, privacy, protection of data 
bases, Viewdata and similar 
systems, transborder data flow, ac- 
cess to government data bases, cryp- 
tography, and the antitrust aspects 
of the telecommumications industry. 
Articles addressing the international 
aspects of information law and policy 
will be of particular interest. 

Guest editors for these special 
issues are Dr. Jon Bing and Professor 
Selmer of the Norwegian Research 



Center for Computers and Law. 
Authors interested in submitting 
papers for these issues should either 
write Dr. Bing at the Norwegian 
Research Center for Computers and 
Law, Oslo University, Karl Johans Gt 
37, Oslo 1, Norway, or write or 
telephone Michael Scott, Editor-in- 
Chief, Computer/Law Journal, 530 
West Sixth Street - 10th Floor, Los 
Angeles, California 90014 

(Telephone: 213- 623-3321). 






SERIOUS SOFTWARE FOR YOUR APPLE! 
EASYWRITER, the best-known, best-loved Word Processor by CAP'N 

SOFTWARE S99 

EASYWRITER, the Professional Word-Processing System with 
80-column Screen-Hardware by INFORMATION UNLIMITED SOFT- 

WARE/CAP'N SOFTWARE $250 

EASYMAILER, the mailing-list and record-management system. Use it 

to interface and merge lists with the Word-Processors above $69 

WHATSIT? the Self-Indexing Query System by COMPUTER HEAD- 
WARE $150 

VISICALC, the numerical-modeling and calculating tool by PER- 
SONAL SOFTWARE $150 

CCA, the complete Data Management System by PERSONAL SOFT- 
WARE, contains mailing-list, report-generation & program-Interfacing 

features $99 

STOCK MARKET ANALYSIS by GALAXY $49 

SUPER-CHECKBOOK does check reconciliation and analysis, by 

POWERSOFT $20 

APPLE-DOC, documents your BASIC programs, by SOUTHWEST 

DATA SYSTEMS $20 

MULTI-MESSAGE, allows you to create large, colorful, hi-res 
messages on multiple TV sets. Broadcast ads from shop-windows & 

trade-show booths. By CONNECTICUT INFO. SYSTEMS $35 

+ APPLE DATA-GRAPH, plots up to 3 hi-res curves, 40 points each, on 
a graph with dimensioned axes. Graphs can be saved to disk & recall- 
ed Instantly! by CONNECTICUT INFO. SYSTEMS $25 

VERBATIM, 5'/i-inch diskettes, per box of 10 $29 

"Either MULTI-MESSAGE or APPLE DATA-GRAPH are FREE 

with each $100 of any merchandise ordered." 

HARDWARE lor your APPLE! 

D.C. HAYES MICROMODEM $300 

MICROSOFT Z-80 SOFTCARD, lets you run CP/M programs on 

APPLE $300 

MOUNTAIN HARDWARE: APPLE CLOCK $225 

ROMPLUS + $169 

CALIFORNIA COMPUTER SYSTEMS: PARALLEL INTERFACE. . $119 

ASYNCHRONOUS SERIAL INTERFACE $159 

SSM AIO SERIAL-PARALLEL INTERFACE works with almost all 

popular printers! $175 

APPLE LANGUAGE SYSTEM with PASCAL $397 

CONNECTICUT INFORMATION SYSTEMS, CO. 
218 Huntington Road, Bridgeport, CT 06608 

(203) 579-0472 
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HI-RES 



GRAPHICS 
APPLE II 



FOR THE 



PADDL£-GRAPHICS/TABlJEnr GRAPHICS 

The most powerful graphic development system available. 
I'pper/lower case text may be drawn in any size, direction or 
color. Pictures may be sketched and filled In with any of 21 HI- 
RES colors (must be seen to believe!!) A shape may be 
constructed automatically from any object appearing on the HI - 
RES screen. 

I 'addle -graphics is for use with the standard game paddles 
distributed with your APPLE and TABLET-GRAPHICS is for 
use with APPLES* GRAPHICS TABLET. 

Paddle and Tablet-Graphics are available now at your local 
computer store and require 48K Applesoft in rom and a disk 
drive. To order directly send 839.95 for Paddle-Graphics or 
849.95 for Tablet-Ciraphlcs to: 

On-Linc Systems 
36575 Mudge Ranch Road 
Coarsegold, CA 93614 
209-683-6858 

MSA, MST CHG, COD, CHECK ACCEPTED 
Look for Hi-Res Football coming soon 




MYSTERY HOUSE 
HI-RES ADVENTURE *1 

Your APPLE computer becomes your eyes and curs as you enter 
u Spooky old mansion in search of treasure. You arc in complete 
control as you open cabinets, smash walls etc. Danger Is ever 
present as you find yourco-adventurers being murdered one by 
one. Can you find the killer before the killer finds you? 

• OVER A Hl'NDRED HI-RES PICIl'RES 

• YOU* GAME MAY BE SAVED FOR LATER CONTINUANCE 

• RINS ON BOTH 48K APPLE II AND APPLE II PLUS 
Ill-Res Adventure "1 Is available now at your local computer 
store and requires a disk drive. To order directly send 824.95 to: 

On-Linc Systems 

36576 Mudge Ranch Road 

Coarsegold, CA 93614 

209-683-6858 

MSA, MST CHG, COD, CHECK ACCEPTED 
Look for Hl-Rcs Football coming soon 



Apple 11 Programs 
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VU #1 - VU #2 - FILES ea 
BINARI INSERT - ROSTER " 


BROKEN ZILB0WS SERIES $21 
MATCHING PATTERNS 

FOREIGN LANG. DRILL 
WATER THE FLOWERS 
MATH DRILL I & II 
CATCH THE PIG $16 


45 
ti 

it 

ii 

it 

45 


TOUCH TYPING TUTOR 
(also in APPLESOFT) 
APPLE MENU COOKBOOK 
SHOPPING LIST 
DATA ORGANIZER 
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45 
ii 

ii 
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II 


BOWLING & TIC-TAC-T0E 
KNIGHTS & SOLITAIRE 
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45 
ii 
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95 
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Cassette Label Program 



Printed labels make cassette recordings easy to find. 
Now the computer can do the dirty work! 



Dawn E. Ellis 

RD8 Box 344 

York, PA 17403 



Did you ever have a hard time fin- 
ding a tape that you thought you 
labled? Are you tired of hearing 
"Honey, did you see the program 
I've been working on?" Have you 
ever tried loading a program when 
you forgot whether it was Integer 
BASIC, APPLESOFT or Machine? If 
you answered any of these ques- 
tions "yes" then this program might 
be the answer to your problems. 

My husband and I have six 
cassette cases of fifteen tapes each 
that have no real system of labeling 
them. While hunting a program that 
just happened to be in the sixth 
case I looked in, I had an idea for 
this cassette cover printer program. 

I sat down that evening after the 
children and my husband had gone 
to bed (that's the only time I can get 

10 REM CASSETTE. LABEL 

20 REM BY DAWN E. ELL 

30 REM RD 8 POX 344 

40 REM YORK PA 1740 

50 DIM ASC9) 

60 AS ■ "":B$ = "! 



the computer) and designed this 
program to use with our teletype. 

I discovered that a line of 41 
characters on our teletype is equal 
to the width of the clear plastic of a 
cassette tape case. Using this fact I 
wrote this program which when run 
creates a printout. The printout is 
designed to be cut and folded to fit 
the inside of the case so that the 
program names are clearly visible. 

Program Description 

Lines 150 to 190 store your name 
and address. Lines 200 to 260 store 
the inside instruction label. It was 
written for a tape that only has one 
program per side. This could be 
changed to suit your needs. Line 900 
enables our TTY output routine. You 
will have to change this line to suit 



your own printer. Lines 1000 to 1150 
print the inside label with the side-A 
and side-B instructions, lined 2000 
to 2160 print the front cover. Use it 
as is or invent your own text 
graphics cover like I did on some of 
mine. If your printer has a graphics 
character set, you're really in luck. 
Lines 3000 to 3030 print the title 
strip. Lines 4000 to 4070 print your 
name and address. Line 4900 turns 
off our teletype motor. Line 4910 
starts you all over again for the next 
cover. Lines 5000 to 5040 centers all 
inputs when they are printed. 

I used colored paper for the 
cassette covers to make it easier to 
spot different types of programs. 
Maybe this program will help you 
keep your tapes organized until you 
win the lottery and buy a disk! 



PROGRAM 
IS 



ONE": PRINT 
ON EACH S 



150 



REM 160 



70 CS = 



39 SPACES 

: DS = " ! 



RAM FOR TAPES WITH 
SPCC 10)5 "PROGRAM 
IDE- 
PRINT '• PRINT "ENTER YOUR NA 
ME:": INPUT A$C0>: IE LEN ( 
ASC0)) > 39 THEN 150 
PRINT "ENTER FIRST LINE OE 3 
ADDRESS:": INPUT ASCI) 
LEN CASCD) > 39 THEN 



100 
1 10 
120 

130 

140 



REM INPUT QUESTIONS 

TEXT : PR* 0: HOME 

PRINT SPCC 9);"CASSETTE COV 

ER PRINTER" 

PRINT SPCC 13)5 "BY DAWN ELL 

IS" 

PRINT : PRINT SPCC 7);"PR03 



170 



180 



LINE 
: IF 
160 
PRINT 
3 LINE 
): IE 
170 
PRINT 

LINE 
: IF 



ENTER SECOND LINE OF 
ADDRESS:": INPUT ASC2 
LEN CASC2)) > 39 THEN 

"ENTER THIRD LINE OF 3 
ADDRESS:": INPUT ASC3) 
LEN CASC3)) > 39 THEN 



October 1980 



MICRO — The 6502 Journal 



29:65 



190 



200 



210 



220 



230 



240 



2 50 



2 60 



900 



990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

107 

1080 

1090 

1100 

1 1 10 

1 120 

1 130 

1 140 

1150 

2000 

2010 



180 

PRINT : PRINT A$<0>* PRINT A 
5(1): PR i:\jt ASC2): PRINT A$< 
3)= PRINT : INPUT "IS THIS C 
ORRECT 7 (Y OR N) ",AS: IF A 



S < > 

HOME : 

SIDE-A 

AS( 4) : 

200 

PRINT "ENTER 
LINE INST* "8 
LEN CASC5)) 

PRINT "ENTER 

2 LINE INST : " 
LEN CASC6)) 

PRINT : PRINT 



"Y" THEN 150 

PRINJT : PRINT "ENTER 

PROGRAM NAME:": INPUT 

IF LEN <AS(4>> > 30 THEN 



EIRS1 LINE OE 2 
INPUT A$<5)8 If 

> 39 THEM 210 
SECOND LINE OE 

: INPUT A5C6): IF 

> 2) THEN 220 
"ENTER SILE-B 



A S C 7 > : 

THEN 2 



2 
IE 



PROGRAM NAME:": INPUT 

IF LEN CASC7)) > 30 
30 
PRINI "ENTER E I RST LINE OE 

LINE INST:": INPUT AS<8>: 

LEN CASC8)) > 39 THEN 2 40 
PRINT "ENTER SECOND LINE OE 
2 LINE. INST:": INPUT A $(9): IE 

LEN (ASC9>> > 39 THEN 250 
PRINT : PRINT "SIDE -A = ".AS 
C4): PRINT A$C5>* PRINT AS (6 
): PRINT : PRINI "SIDE-3 = " 
JASC7): PRINT ASC8>: PRINT A 
SC9>: PRINT : INPUT "IS THIS 

CORRECT 7 (Y OR N) ",A$: IE 
AS < > "Y" THEN 200 
CALL 7 68: PRINT : 
29 3*0: FOR Z = 1 
Z: PRINT : PRINI 
REM INSTRUCTION 



POKE - 
TO 2000: 



16 

NEX1 



PAGE 



PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
AS = " 



CUT 



ds; 

B$ 

bs; 
bs; 

BS 

BS 

(SIDE-A) 



INSTRUCT ION" 
PAGE" 



AS = A S ( 4 ) : 
AS ■ A S C 5 ) : 
AS = AS(6) : 

PRINT BS 
AS = "(SIDE-B)": 
AS = A£( 7) : GOSUB 
AS = A$C8>: GOSUB 
AS = A$C9>: GOSUB 
PRINT D$; " FOLD" 
REM COVER PAGE 
PRINT " ! A 
PP L EEEEE 



GOSUB 
GOSUB 5000 
GOSUB 5000 
30SUB 5000 



5000 



30 SUB 
50 00 
5000 
5000 



PPPP 



5000 



PP 



2020 

2030 

2040 
2050 
2060 
2070 
2080 

2090 
2100 
2110 
2120 
21 30 
2140 
2150 

2160 

3000 
3010 

3020 

3030 
4000 
4010 
4020 
4030 
4040 
4050 
4060 
4070 

4900 
4910 
5000 
5010 

5020 

5030 
5040 



PRINT "! A A 

PL E 

PRINT " ! A 
PL E 



P ? P 

! E HON T " 

A P P P 

! COVER" 



A A PPPP 

EE E ! " 

AAAAA P 

E !" 

A 

E 

A 



A 



PP 
P 
P 
P 

I I II I 

I 

I 

I 

I 

I 
I I I I I 



PRINT "! 
P? L 
PRINT "! 

L 
PRINT "! 

L 
PRINT "! 

LLLLL EEEEE 
PRINI "! 

PRINT 

I I I I I 

PRINT 
I 

PRINT 
I 

PRINT 

I !" 

PRINT 
I 

PRINT 
I 

PRINT 

I I I I I ' " 

PRINT DSJ " EOLD" 

HEM TITLE STRIP 
AS = "SIDE-A = " + ASC4): .JOSUB 
5000 

AS = "SIDE-B = " + AS(7): GOSUB 
5000 

PRINT D$;" EOLD" 

REM YOUR NAME AND ADDRESS 
AS ■ A$(0>: GOSUB 5000 
AS ■ AS( 1 ) : GOSUB 5000 
AS = ASC2>: GOSUB 5000 
AS = ASC 3) : GOSUB 5000 

PRINT BS 

PRINT DS; " CUT" 

PRINT : PRINT : PRINT : PRINT 

PR# 0: POKE - 16294,0 

10TO 200 

REM CENTERING ROUTINE 
Z = 39 - LEN CAS>:Y = INT 
C 2 / 2 ) 8 X = Z - Y 
CS = LEFTS CBS,* + 1 ) + AS + 

RI 3HTS <BS,X + 1 ) 

PRINT CS 

RETURN 
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ACTION, STRATEGY, AND FANTASY- 

for the SERIOUS games player 

and his APPLE U 



Brain Games - 1 demands ingenuity. 

Two players bombard radioactive material with protons 
and electrons until it reaches critical mass and sets up a 
Nuclear Reaction. Dodgem requires you to outmaneuver 
another player to get your pieces across the board first. 
Dueling Digits and Parrot challenges your ability to 
replicate number and letter sequences. Tones lets you 
make music with your Apple (16K) CS-4004 $7.95. Strategy 
Games and Brain Games are on one disk (16K) CS-4503 
$14.95. 

Strategy Games - 1 keeps games players in suspense 

You and your opponent trail around the screen at a 
quickening pace attempting to trap each other in your 
Blockade. A 7 category quiz game will certify you as a 
Genius (or an errant knave!). Beginners will meet their 
master in Checkers. Skunk and UFO complete this classic 
collection (16K) CS-4003 $7.95 

Know Yourself through these valid self -tests 

Find out how your life style effects your Life Expectancy 
or explore the effects of Alcohol on your behavior. Sex 
Role helps you to examine your behavior and attitudes in 
light of society's concept of sex roles. Psychotherapy 
compares your feelings, actions, and phobias to the 
population's norms and Computer Literacy tests your 
microcomputer savvy. A fun and instructional package 
(16K) CS-4301 $7.95. Know Yourself and CAI Programs 
are on one disk (16K) CS-4503 for $14.95 





You're in command in Space Games - 1. 

Maneuver the TIE fighters into your blaster sights and 
zap them with your lasers to save the rebel base camp 
from annihilation in Star Wars. Rocket Pilot is an ad- 
vanced real time take off and landing game. High resolu- 
tion graphics, exploding saucers and sound effects add to 
the suspense as you repel the Saucer Invasion. Finally, a 
bonus graphics demonstration, Dynamic Bouncer (16K) 
CS-4001 $7.95. Space Games and Sports Games are on 
one disk (16K) CS-4501 for $14.95 

ACTION 

Sports Gomes - 1 puts you in the Apple World Series 

Take the field in the Great American Computer Game. 

Mix up your pitches to keep the batter off balance. Move 
your fielders to snag the ball before he gets to first. Balls 
and strikes, double plays, force outs, and errors let you 
play with a realistic strategy. Also in the line up— Slalom, 
a championship downhill ski race, Torpedo Alley, and 
Darts (16K) CS-4002 $7.95. Space Games and Sports 
Games are on one disk (16K) CS-4501 for $14.95 

It's easy to order SENSATIONAL SOFTWARE for your Apple II. 

Send paymenl plus $1.00 shipping and handling in the U.S. ($2.00 foreign) to 
Creative Computing Soltware, P.O. Box 789-M, Morristown, N.J. 07960. N.J. residents 
add $1 00 sales tax. Visa, Master Charge and American Express orders may be called in toll 
free to 800-831-8112 (in N.J. 201-540-0445). . 



Dealer Update 



Once again MICRO presents a list 
of dealers for reference. This list is 
in zip-code order within the U.S., 
followed by Canada and Europe. 
Only those dealers who responded 
to our request for information or 
those who have been our dealers for 
several months are presented. If you 
now carry MICRO and are not listed, 
you will be included in the next up- 
date. 

U.S. (zip-coded) 

Programmatics 
71 Sargent Avenue 
Providence, Rl 02906 
6502: PET 

American Business Computers 

454 Thames Street 

Groton, CT 06340 

(203) 445-5166 

Contact: Paul Simard, Ralph Edwards 

6502: Ohio Scientific 

Soft CTRL Systems 

Box 599 

West Milford, NJ 07480 

(201) 728-1272 

6502: Software and Hardware for the APPLE. 

Stonehenge Computer Shop 
89 Summit Avenue 
Summit, NJ 07901 
(201)277-1020 
Contact: Mike Mahoney 
6502: APPLE, PET, Hardware 

Polks/Aristo 

314 5th Avenue 

New York, New York 10001 

(212) 279-9034 

Contact: Lewis Polk 

Intechnology (OSI) 
23 East 20th Street 
New York, New York 10003 
(212)673-6310 
Contact: Hal 

6502: Ohio Scientific, WP6502, Structured Pro- 
gram Designers 



JINI Micro Systems, Inc. 

Box 274 

Bronx, New York 10463 

(212) 796-6200 

Contact: Jim Iscaro 

6502: Software/JINSAM Data Manager 

Designers & Builders of 

Information Systems, Inc. 

One Mayfair Road 

Eastchester, New York 10707 

(914) 779-5292 

Contact: Lee Kupersmith 

6502: Ohio Scientific, peripherals 

Berliner Computer Center 

102 Jericho Turnpike 

New Hyde Park, New York 11040 

(516) 775-4700 

Contact: Bob Berliner 

6502: APPLE dealer/service center, custom 

software department 

Computerland of Nassau 
79 Westbury Avenue 
Carle Place, New York 11514 
(516) 742-22262 
Contact: K. Bub 

Mr. Computer 
Imperial Plaza, Route 9 
Wappingers Falls, New York 12590 
(914) 297-1223 

Future Distribution, Inc. 
Trimex Building, Route 11 
Mooers, New York 12958 
(514)861-4741 
Contact: P.H. Faure 

Upstate Computer Shop 

629 French Road, Campus Plaza 

New Hartford, New York 13413 

Contact: Tony Violante 

6502: APPLE, Commodore, Atari, North Star, 

Printers, Terminal Furniture, Software, MICRO, 

Supplies and many services 

Computerland/Paoli 
81 E. Lancaster Avenue 
Paoli, PA 19301 
(215) 296-0210 
Contact: D. Reece 



Personal Computer 

24-26 W. Lancaster Avenue 

Paoli, PA 19301 

(215)647-8463 

Contact: Bob Bryant 

6502: Atari, APPLE 

The Program Store 
4200 Wisconsin Avenue NW 
Washington, DC 20016 
Contact: Mr. Daly 

Computerland of Tysons Corner 
8411 Old Court House Road 
Vienna, Virginia 22180 
(703) 893-0424 

A I Personal/Adventure 
178 Oxford Road 
Fern Park, Florida 32730 
Contact: Alexis Adams 

Turnkey Mini-Computer Systems, Inc. 

7372 NW 5th Street 

Plantation, Florida 33317 

(305) 791-4578 

Contact: Dan Pincu 

6502: APPLE and peripherals 

Computerland 
3020 University Drive NW 
Huntsville, Alabama 35805 
(205) 539-1200 

Computerlab 

627 S. Mendenhall 

Memphis, Tennessee 38117 

(901) 761-4743 

Contact: James Watter 

6502: Hardware, Software, books, peripherals, 

repair 

Computerland 

4579 Great Northern Boulevard 

N. Olmsted, Ohio 44070 

(216) 777-1433 

6502: Commodore, APPLE, Synertek 

Computerland 

1288 Som Center Road 

Mayfield Heights, Ohio 44124 

(216)461-1200 

6502: Commodore, APPLE, Synertek 
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Computer Solutions 

1932 Brown Street 

Dayton, Ohio 45409 

(513) 223-2348 

Contact: Harvey Curran 

6502: APPLE, books, magazines 

Computerland Merrillville 
19 West 80 Place 
Merrillville, Indiana 46410 
(219) 769-8020 

Contact: Andy, Chuck, Debbie 
6502: APPLE, PET, Atari 

Digital Technology 
10 N. Third Street 
Lafayette, Indiana 47901 
(317) 423-2548 
Contact: Greg Madder 
6502: APPLE 

New Dimensions in Computing 

541 E. Grand River 

East Lansing, Michigan 48823 

(517)337-2880 

Contact: Robert Gibbs 

Coloma Computer Company 

190 Paw Paw Street 

Coloma, Michigan 49038 

(616) 468-4145 

Contact: Joseph Johnson 

6502: Atari hardware and software 

Abacus Software 

P.O.Box 7211 

Grand Rapids, Michigan 49510 

Contact: Arnie Lee 

6502: PET Machine Language guide, 

Pascal for PET and APPLE 



Tiny 



Home Computer Center 
2115 East 62nd Street 
Indianapolis, Indiana 46220 
Contact: Sandra McGee 

Cyberia, Inc. 

2330 Lincolnway 

Ames, Iowa 50010 

(515) 292-7634 

6502: APPLE, Commodore, Sales and Service 

Computer Emporium 

3711 Douglas 

Des Moines, Iowa 50310 

etc. Personal Computing 
6617 27th Avenue 
Kenosha, Wisconsin 53140 

Faragher Associates, Inc. 
7635 Bluemound 
Milwaukee, Wisconsin 53213 
(414) 258-2588 
6502: Ohio Scientific 

Byte Shop 

6019 W. Lay ton 

Greenfield, Wisconsin 53220 

ComputerLand 

1500 South Lake Street 

Mundelein, Illinois 60060 

(312)949-1300 

Contact: Ted Essex 

Oak Brook Computer Centre 

17 W 426 22nd Street 

Oakbrook Terrace, Illinois 60181 

(312)941-9005 

Contact: Bill Colsher 

6502: APPLE and compatible hardware and 

software 



Data Domain of Schaumburg 
1612 E. Algonquin Road 
Schaumburg, Illinois 60195 
(312) 397-8700 

Contact: Steve Shendelman 
6502: APPLE products 

ComputerLand 

136 Ogden Avenue 

Downers Grove, Illinois 60515 

(312) 964-7762 

6502: APPLE, Mountain Computer, DC Hayes, 

Level I Service 

The Computer Store 

3515 Auburn Street 

Rockford, Illinois 61103 

(312)962-7580 

Contact: Clyde Person 

6502: APPLE and Ohio Scientific 

Illinois Computer Mart, Inc. 

1114 W. Main Street 

Carbondale, Illinois 62901 

(618) 529-BYTE 

Contact: Craig Martin 

6502: APPLE II sales, service, programs 

Computer Country 

235 Dunn Road 

Florissant, Montana 63031 

(314) 921-4434 

Contact: Jim Carroll 

6502: PET, KIM, APPLE, software 

Computer Country 

808 Olive Street 

St. Louis, Montana 63101 

(314)231-1101 

Contact: Charles Tutt 

6502: PET, KIM, APPLE, software 

Computer Country 

4479 Lemay Ferry Road 

St. Louis, Montana 63129 

(314)487-2033 

Contact: Greg Kirkpatrick 

6502: PET, KIM, APPLE, software 

Computers ASP, Inc. 

7115 NW Barry Road 

Kansas City, Missouri 64152 

(816)741-8013 

6502: APPLE II, accessories 

Personal Computer Center 
3819 W 95th Street 
Overland Park, Kansas 66206 
(913) 649-5942 

High Technology of Wichita 

1038 West Pawnee 

Wichita, Kansas 67213 

(913) 262-0315 

Contact: Richard Bowman 

6502: APPLE II sales, service, software. PET 

sales and software, Atari sales and software 



Computers Plus 
5970 Broadway Boulevard 
Garland, Texas 75043 
(214) 840-1383 

R & L Data Systems, Inc. 

190 Lomax Street 

Idaho Falls, Idaho 83401 

(208) 529-3785 

Contact: Larry L. Brown 

6502: Authorized sales and service dealer for 

APPLE, North Star, NEC Printers, Anadex 

Printers, Soroc Terminals, and a complete line 

of floppies, along with all related supplies. 



Home Computers 

1775 E. Tropicana #2 

Las Vegas, Nevada 89109 

(702) 736-6363 

Contact: Ike Jordan 

6502: Commodore CBM, APPLE, Atari, and 

associated peripherials 

Malibu Microcomputing 
23910 A De Vine Way 
Malibu, California 90265 

Computer Forum 

14052 E. Firestone Boulevard 

Santa Fe Springs, California 90670 

(213)921-2111 

(714)7390711 

Contact: Mike Nell 

6502: APPLE, PET, SYN1, Software, Repair, 

Books, Magazines 

Byte Shope 

5453 E. Stearns Street 

Long Beach, California 90815 

(213) 579-7771 

6502: APPLE, PET, CBM, and peripherals 

Computer World 
3808 West Verdugo 
Burbank, California 91505 
(213) 848-5521 
Contact: Joan Haller 
or Stuart Mills 

Silver Spur 

Electronic Communication Co. 
3873 Schaefer Avenue Suite F 
Chino, California 91710 
(714) 627-9366 

Computermart of California 

315 C Diamond Bar Boulevard 

Diamond Bar, California 91765 

(714) 598-7505 

Contact: Dave Glawson 

6502: APPLE, PET, Atari, Software, Books 

Computerland Castro 

2272 Market Street 

San Francisco, California 94114 

Sunset Electronics 
588 San Mateo Avenue 
San Bruno, California 94066 
(415) 588-9705 

Sunset Electronics 

2254 Taraval Street 

San Francisco, California 94116 

(415) 665-8330 

Computerland of Sacramento 
1537 Howe Avenue Suite 106 
Sacramento, CA 95825 
Contact: Terry E. Bradley 

Small Computer Systems 
3149C Waialae Avenue 
Honolulu, Hawaii 96818 

Camera and Computer Emporium, Ltd. 

921 SW Morrison 

Portland, Oregon 97205 

(503) 228-5242 

Contact: Harry Sweeny 

6502: APPLE, Peripherals, Software 

Camera and Computer Emporium, Ltd. 
Holly Farm Mall 
16144 S.E. McLoughlin 
Milwaukie, Oregon 97222 
(503)659-9191 
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The Computer Connection 
3100 NW Bucklin Hill Road 
Silverdale, Washington 98383 
(206) 692-361 1 
6502: APPLE authorized dealer 

Ye Olde Computer Shoppe, Inc. 
1301 George Washington Way 
Richland, Washington 99352 
(509) 946-3330 

Canada 

The Computer Shop 

3515 18th Street S.W. 

Calgary, Alta. 

T2T 4T9 

Canada 

243-0301 

6502: APPLE, PET, KIM 

TJB Microsystems, Ltd. 
10991 124 Street 
Edmonton, Alberta 
Canada T6M 0H9 
Contact: Jim Nerkerson 
6502: Commodore PET, APPLE 

McKay Systems Corp., Ltd. 

The Byte Shop 

2151 Burrard Street 

Vancouver. B.C. V6J 3H7 

Canada 

(604) 738-2181 

Contact: Don McKay 

6502: APPLE, Atari, North Star, T.I., 

Centronics, and software 

Compumart 

411 Roosevelt Avenue 

Ottawa, Ontario 

K2A 1T2 

Canada 

(613) 725- 3192 

6502: PET, APPLE, KIM 

Home Computer Centre 
6101 Yonge Street 
Willowdale, Ontario 
M2M 3W2 Canada 
(416)222-1165 

Europe 

Microtronic Dataprodukter 

Box 401 

184 00 Akersberga 

Sweden 

0764/65460 

Contact: G. Berglund 

6502: OSI 

Elincom 
Oosterkade 69 
9503 HR Stadskanaal 
The Netherlands 
Contact: J. Hovius 

Marketing Trim AB 

Box 10031 

S-100 55 Stockholm 

Erik Dahlbergsg 41 — 43 

Sweden 08-61 22 04 

6502: AIM-65, Compukit. Acorn, 

Memory Boards, Books, Magazines 

Portable Microsystems, Ltd. 
Forby House, 18, Market Place 
Brackley, Northants 
England, NN13 5SF 
0280 - 702017 
Contact: Mike Ayers 
6502: AIM-65 



RUN YOUR CLASSIFIED 
WITH MICRO 

A classified ad in MICRO 
will bring your product/service 
to the attention of thousands 
of readers. These ads are plac- 
ed in clusters throughout the 
magazine. Nowhere else will 
you find such a bargain on 
classified ads. An ad in 
MICRO only costs $10.00 per 
insertion. Please limit these 
insertions to six typewritten 
lines. (Absolutely no more 
than 40 words.) You may in- 
dicate a title line in addition to 
the body of the ad. The com- 
pany name and address will be 
set at the end of the ad and are 
not considered in the body 
count. These ads must be pre- 
paid and received before the 
end of the month preceding 
the month of publication. (No 
later than October 31 for the 
November issue. Ads received 
later than the required date 
will be placed in the next 
issue.) Be SEEN in MICRO. 



APPLE OWNERS— NO DISK? 
Want to store and retrieve files on 
tape? Create your own file struc- 
ture, search, sort and more. Send 
$19.95 tor tape and instruction 
manual, or send $1.00 for addi- 
tional information. $1.00 applied 
toward purchase. 32K + Applesoft 
in ROM required. 

SUPER SOFTWARE CO. 

P.O. Box 684 

Pittsburgh, PA 15219 



BE YOUR OWN ASTROLOGER 
Impress your friends. Two BASIC 
programs for PET (8K or more). 
ASCALC calculates six attributes 
including Rising Sign. Over one- 
half million combinations. 
DAY/HOUR calculates planetary 
hours, etc. 43 page book gives in- 
terpretations. NO. AST— T2-001 
$15.95. CA res. add 6%. 

ACCESS 

P.O.Box 8726 

Rowland Heights, CA 91748 



OHIO SCIENTIFIC 



IN STOCK 



SUPERBOARD II 8K BASIC $299. 

CHALLENGER 1P8K RAM 399. 

CHALLENGER 1P Minifloppy 1250. 

C4P Cassette Color 8K RAM 750. 

C4P Minifloppy 24K Color 1795. 

C8P Expandable 8K RAM 950. 

C8PDF Dual 8" Floppies 32K 2895. 

C20EM 48K Dual 8" Floppies 2799. 

C30EM 48K Triple Processor 3995. 

C3S1 Dual 8" Floppies 48K 4095. 

C3A 48" Cabinet C3 5995. 

DSK-5A 5ft Desk for C20EM 300. 

AC-3PB&W12"TV/Vid.Mon. 129. 

AC-15P 12" Color Monitor 475. 

AC-9TP Centronics Tractor Ptr 1250. 

AC11P300 Baud Orig. Ans. Mod. 199. 

AC-14 NEC Spinwriter 55cps 2795. 

A C-5A Okida ta HS Line Ptr. * 2950. 

S-120 Soroc Serial Video Term. 995. 

CA-9 Centronics Parallel Interf. 175. 

CA-10-2 2 RS232 Serial Ports 175. 

CA-12 96 Line Parallel I/O 1 25. 

CA-14A Votrax Voice Synthes. 399. 

4KP 4K Expansion Kit of 2114's 49. 

CM-2 4K Expansion Mem for D000 1 29. 

CM-3A 16Klow Po wer 2Mhz Bd 399. 

CM-6 48K Dynamic Ram 1Mhz 549. 

CM-924K Static RAM 2114s 450. 

CM-10 8K Static RAM D&EAddr. 198. 

610-8K Supbd 8K Exp & Disc Ctl 298. 

A TV Microverter to Modulate TV 35. 

505 B Upgrade Disk Ctlr CPU bd 275. 

540 B Color Video Board 200. 

570 C Upgrade to C3 CPU's 600. 

470B Upgrade Floppy Controller 175. 

C730 Centronics 730 Parallel Prt 899. 
At time of preparation, all of the above 
items were in stock except those marked 
with an '. 



FREE ATV 

MICROVERTER 

With purchase of an 8K 

CHALLENGER 1P 

Limited Quantity — First 25 Customers 



CDmPUTERSHDP 

Boston union N H Cambridge 

590Comm Ave Rie 168 288 Norlolk St 

(across from B U ) 603-473-2323 (nearM I T.) 

2470700 661-2670 



Up From the Basements 



There are always problems and growing pains 
associated with an emerging market. The Ohio Scien- 
tific market is no different. The most serious threat I 
see to the healthy expansion of that market is soft- 
ware piracy. Wholesale software piracy could be par- 
ticular damaging. If that occurs, the responsibility 
for the damage will fall on both end-users and 
dealers, and the effects will injure us all. 

Because the Ohio Scientific market is oriented 
very much toward vertical-market applications, it is 
particularly vulnerable to the ill effects of software 
piracy. Also, since this market is in its infancy, it 
lacks the maturity and economic pressures that keep 
the CP/M market balanced. 

For those of you unfamiliar with the term "vertical 
market," it is a vertical segment of the over-all 
business market that can be characterized by a par- 
ticular need. For example, all automobile dealers, as 
part of their business, handle financing, and auto 
financing may be considered a vertical market within 
the over-all financial market which cuts across all 
types and sizes of businesses. A computerized 
finance program could appeal to a range of different- 
sized automobile dealers, which might other wise re- 
quire special-purpose software. Ohio Scientific, with 
its high-performance, low-priced hardware, has suc- 
ceeded very well with programmers who are in- 
terested in writing their own software for such ap- 
plications. 

Dealers and end-users who have been successful 
with a particular vertical-market package are just 
starting to advertise their packages in various trade 
journals and through mailings. Their experience will 
largely determine the future health and quality of in- 
dependent Ohio Scientific-based software. If they 
find their packages are routinely pirated by others, 
then they are unlikely to return to the marketplace 
with a package of similar quality. Furthermore, if a 
dealer or end-user purchases a package that does 
not meet his expectations or, worse yet, finds that he 
can't get support from the vendor once he receives 
the package, then the dealer or end-user is going to 
be much more cautious about entering the 
marketplace again. 

Software piracy is already occuring on a large 
scale. One of the most widely advertised, indepen- 
dent Ohio Scientific-compatible software packages 
was not written by its vendors. The software pur- 
chaser already has become somewhat wary, because 
of the spotty quality of software and support 
available from the factory and from factory- 
supported software vendors. If software available 
through independent channels fails to improve on 



that situation, there just won't be much of a 
marketplace for software. 

So here we sit with a burgeoning marketplace 
which has the potential to support very high-quality 
applications software. On the other hand, the 
marketplace could shrink to include only very low- 
priced software of questionable utility, with the 
quality software eventually going to other machines. 

As an end-user, there are several things that you 
can do. The first is: refuse to copy for another user 
any software you may have purchased. The second 
is: Insist on original copies of all software and 
documentation that you purchase. Original copies 
will generally include some sort of license form and 
serial number. For your own protection, you should 
also insist on knowing who the authors of the soft- 
ware are and what sort of support you can expect 
from both your dealer and the original vendor of the 
software. Though the market is still young, there is 
no reason why quality software should not also have 
quality documentation. Too often, authors are more 
proficient in writing code than they are in writing the 
English language. However, if the marketplace 
demands a particular quality of documentation, you 
can be sure that software vendors will do their best 
to conform to that standard. If you ever suspect that 
you have received a pirated copy, you should make 
every attempt to contact the authors. In case your 
dealer fails at some point to provide the support you 
need, that is really the only way to protect your in- 
vestment. 

Steps are now being taken by vendors as well. The 
most significant is the formation of an independent 
corporation, by several of the larger distributors of 
Ohio Scientific hardware, to distribute software and 
nurture the market to maturity. Though this organiza- 
tion is still in its natal stages, I have high hopes that 
it will be a strong force working in the interests of 
both the software vendor and the software pur- 
chaser. It will be able both to prevent and prosecute 
the software pirate and also serve as a resource 
center for software vendors and software pur- 
chasers. In addition, the new organization will insure 
that high-quality software will include high-quality 
documentation. It will also answer questions from 
end-users and dealers concerning installation of the 
packages that it offers. 

If the new software corporation is as successful as 
I hope, and end-users realize the value of a strong, in- 
dependent software market and work to make it hap- 
pen, I am convinced that Ohio Scientific computers 
will live up to their potential as the most cost- 
competitive machines available today. Excellent 
software is being written all across the country for 
these machines, for every conceivable application. 
With the proper encouragement and a healthy 
marketplace, it won't be long before we all have ac- 
cess to it. 

Jeff Beamsley 
The Software Federation, Inc. 

44 University Drive 
Arlington Heights, IL 60004 
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PO Box 6502 
Chelmsford, Mass 01824 

617-256-5515 



"The BEST of MICRO Volume 1" contains all of the Impor- 
tant material from the first six issues of MICRO in book 
form. 

"The BEST of MICRO Volume 2" contains all of the impor- 
tant material from the second six issues [#7 to 12] of 
MICRO in book form. 

"ALL of MICRO Volume 2" is all six issues of Volume 2, 
issues 7 to 12, at a special reduced price for a limited time 
while supplies last. 

Back Issues: 



Issues 7 to 12: 
Issues 13 on: . 



All payments must be in US dollars. 

Make checks payable to: MICRO 

Foreign payments in International Money Order or cash. 



Subscription: One Year = 12 issues. Circle correct cate- 
gory and write amount in space provided. 

Surface: 

United States $15.00 



All Other Countries 

Air Mall: 

Central America 
Europe/So. America 
All Other Countries 

"BEST of MICRO Volume 1" 
Surface 
Air Mail 

"BEST of MICRO Volume Z 

Surface 

Air Mail 
"ALL of MICRO Volume 2" 

Surface 

Air Mail 



No. 



No. 



Surface @ $1.75 each 
Air Mail @$2.75 each 
Surface & $2.25 each 
Air Mail @ $3.25 each 



TOTAL 



$18.00 

$27.00 
$33.00 
S39.00 $ 

$7.00 
$10.00 $ 



$9.00 
$13.00 

$9.00 
$13.00 



= $ 
$ 



If you are a subscriber, attach label or write subscription number here: 

Name: 

Address: 



City: 

Country (if not U.S.): 

Help MICRO bring you the info you want by completing this short questionnaire. 
Microcomputers Owned/Planning to Buy: AIM SYM KIM PET APPLE OSI Other: . . . 
Peripherals Owned/Planning to Buy: Memory Disk Video Printer Terminal Other: . . 
Microcomputer Usage: Educational Business Personal Control Games Other: 

Languages Used: Assembler BASIC FORTH PASCAL Other: 

Your comments and suggestions on MICRO: 



State: Zip: 



Name: 

Location: 

No. of Members: 

Meeting algorithm (date, time, place):. 



Club/Group User Registration Form 
President: 



Publications:.. 



Aim/Purpose of the group: 

For Current Information, Contact: 



Software/Hardware Catalogue Entry 

Do you have a software or hardware package you want 
publicized? Our Software and Hardware Catalogues offer a 
good opportunity to receive some free advertisement. These 
regular features of MICRO are provided both as a service to 
our readers and as a service to the 6502 industry which is work- 
ing hard to develop new and better software and hardware pro- 
ducts for the 6502 based system. There is no charge for 
listings in these catalogues. All that is required is that material 
for the listing be submitted in the listing format. All informa- 
tion should be included. We reserve the right to edit and/or re- 
ject any submission. We might not edit the description the 
same way you would, so please, be brief and specific. 

Name: 

System: 

Memory: 

Language: 

Hardware: 

Description: 

Copies: 

Price: 

Author: 

Available from: 



Classified Ad 

Classified ads provide an economical way to announce 
new products or sales promotions, generate product interest, 
enhance visibility and promote good will. MICRO clusters 
large format classified ads at high impact locations 
throughout each issue. Because classifieds represent a ser- 
vice to readers, MICRO must restrict each advertiser to a 
single, six-line insertion per issue. The nominal $10 charge 
reflects our preparation costs and must be prepaid. 

Description: 

Name: -. 

Address: 

City.State: Zip: 



Other 

If you are interested in Writing for MICRO, becoming a 
MICRO dealer or advertising in MICRO, please indicate below 
and the information will be mailed to you. 



Dealer Information Package: 
Advertiser's Media Package: 
MICRO Writer's Guide: 




P.O. Box 6502 
Chelmsford, MA 01824 



The MICRO Software Catalog: XXV 



Software announcements for the 6502 based systems 



Mike Rowe 

P. O. Box 6502 

Chelmsford, MA 01824 



Name: CRYSTAL CAT. 

System: Apple II, Apple II Plus 

Memory: 32K 
Language: Machine 
Hardware: Disk II 
Description: With this program you 
can type "BRUNC" instead of 
"CATALOG" in order to: display all 
file names at one in alphabetical 
order — fast! Allow just 2 or 3 
keystrokes to run any file, show 
binary addresses and lengths, show 
hidden control characters, show 
free space on disk, and more, 
operate with 1 or 2 drives using DOS 
3.1 or 3.2. The program is completely 
relocatable; it can be run in any free 
5K block of memory. 
Price: $19.95 

Includes: Diskette, operating in- 
structions 
Author: Daniel J. Hughes 

Available: J Del LectricWare, Inc. 
P.O.Box 9140 
St. Louis, MO 63117 



Name: Inventory Program 

System: Apple II, Apple II Plus 

Memory: 48K (Firmware Card on 

Apple II) 
Language: Applesoft, Assembly 
Hardware: 2 disk drives, 132 col- 
umn printer 
Description: Maintain a complete in- 
ventory on up to 800 items. Every 
category included to backorder as 
well as LOC, Coast and QTY on 
order. Generates search reports, 
keeps a running account of what 
was sold YTD and much more. A 
must for inventory control or daily 
inventories. 



Price: $140.00 with complete 

manual 
Author Gary E. Haffer 

Available: Software Technology 

for Computers 

P.O. Box 428 

Belmont, MA 02178 



Name: ON-LINE DATABASE 

System: Apple II, Apple II Plus, 

Language System 
Memory: 48K 
Language: Applesoft, Machine 

Language 
Hardware: Disk II 
Description: An extremely fast and 
easy to use database system. Full 
screen editing during data entry or 
updating. Holds binary file pointers 
in memory to reduce disk access to 
a minimum. Allows user definition 
of searches and sub-sorts based on 
fields and sub-fields in the data 
records. Automatically prints full 
data screens, user defined reports, 
and mailing labels. 
Price: $100.00 

Author: Mike Dhuey 

Available: Blue Lakes Computing 
438 N. Frances 
Madison, Wl 53703 



Name: 



System: 



Memory: 

Language: 

Description: 



R.F. Power Amplifier 
Design 

Apple II with Applesoft 
II firmware card or Ap- 
ple II Plus, with 48K 
RAM 
48K 

Firmware Applesoft 
This set of programs 



allows the user to design R.F. Power 
Amplifiers through the use of 
Microstripline, or conventional 
lumped constant methods. One can 
select either resistive or reactive im- 
pedances for interstage or tran- 
sistor matching, respectively. All 
standard dielectric constants for 
standard P.C. boards are supported. 
Microstripline filters, splitters/com- 
biners, and resistive matching net- 
works can also be designed using 
this program. All schematics are 
shown in High Resolution Graphics 
with labels to show component 
location and value. 
Price: $69.95 

Includes: Diskette, Description 

and Examples 
Author: David A. Glawson 

Available: Computermart of 

California 

315C Diamond Bar 

Blvd 

Diamond Bar, CA 

91765 



Name: 

System: 

Memory: 



Language: 
Hardware: 



Contest 

Apple II, Apple II Plus 
32K RAM — ROM Ap- 
plesoft, 48K RAM(disk) 
Applesoft 
Applesoft 

Apple II, single drive. 
Appleclock, printed 
desired but optional 
Description: Designed for any 
amateur radio operating contest. 
Provides not only logging contacts 
with other amateur operators, but in 
the fast-paced contest quickly tells 
the operator whether he has worked 
a particular station before. Handles 
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up to 900 contacts. Operator 
specifies call sign, signal report and 
section. If he has worked a par- 
ticular station before, the program 
will tell him immediately and place 
him back in beginning entry mode 
again. Many other features. 
Copies: Just released 

Price: $14.95 cassette or 

user provided diskette. 
$19.95 on author sup- 
plied diskette. Specify 
Applesoft ROM or 
RAM. 
Author: Al Jensen 

Available: Ai Jensen 

19111 First Avenue 
Seattle, WA 98177 

Name: PLOT 

System: Apple II, Apple II Plus 

Memory: 16K 

Language: Applesoft 

Hardware: Apple II with Applesoft 

in ROM or Apple II 

Plus 
Description: PLOT will graph virtual- 
ly any function in HIRES graphics. It 
features automatically scaling of 
the y-axis, use of built in functions, 
and the ability to graph up to 5 func- 
tions on one set of axes. Built in fun- 
tions include ABS, SIN, COS, TAN, 
INT, SGN, and many more. 
Copies: Just released 

Price: $9.95 

Author: Joe Verzulli 

Available: Softpoint 

Dept. A 

103 Clinton Avenue 

Terryville, NY 11776 

Name: SYMBOL 

System: AIM-65 

Memory: 4K or more 
Language: Aim-65 Assembler 
Hardware: AIM-65 Assembler, 

with cassett 
Description: Saves paper by making 
assembly listings unnecessary. 
Allows user to find a specific sym- 
bol, step up, step down, and list 
table to printer/display. Also 
calculates total number of symbols 
and total RAM required for table in 
HEX. Uses F3 key and $E00 to $FFF. 
Copies: Just released 

Price: $6.00 obj only, $12.00 

obj and src. Will 
customize program for 
$10.00 extra 
Author: Doug Kaynor 

Available: Software Experience 
308 NE 24th Avenune 
Portland, OR 97232 



Name: PolyMan 

System: Apple II, II Plus 

Memory: 48k & ROM Applesoft 

64k & Language Sys. 
Language: Applesoft 
Hardware: Disk II, printer optional 
Description: Allows interactive 
manipulation of twenty polynomials 
of degree less than 21. Add, sub- 
tract, multiply, divide, find all real 
and complex roots, integrate, dif- 
ferentiate, evaluate at real or com- 
plex point, and graph between real 
limits with automatic scaling of 
graph and annotation of extrema. 
Save and recall graph files and 
database files on disk. Display or 
print coefficients or roots, input by 
roots or coefficients. 
Copies: Just released 

Price: $24.95 plus 4.5 %tax 

in Ohio 
Includes: Diskette and manual 
Author: Robert Rennard 

Available: SmartWare 

2281 Cobble Stone Ct 

Dayton, Ohio 45431 

Name: Apple World 

System: Apple II, Plus 

Memory: 48K 
Language: 6502 machine code 
Description: Apple World is a new 
3-D hires graphics package for the 
Apple II computers that promises to 
make drawing figures in three 
dimensions easier than ever. Is a 
text-editor base and is easy for 
anyone to us. Includes color, text- 
editor input, and user oriented input 
(no subroutines to call!). 
Copies: 500 

Price: $59.95 plus $5.00 s&h 

Includes: 32 page instruction 

manual, system disk 
Author: Paul Lutkus 

Available: USA 

750 Third Avenue 
N.Y. N.Y. 10017 



Name: The Conditioning Life 

Dynamic 

System: Apple II 

Memory: 48K 
Language: Applesoft, Machine 
Hardware: Apple II, Disk II 
Description: This disk adds up to a 
long, intense look at conditioning, 
motivation, positive and negative 
reinforcements, etc. Deals with con- 
ditioned values, effects, responses, 
attitudes, beliefs, and motivations. 
Centers on five programs. One 
allows you to condition a Hi-res 



mouse to perform up to 200 sequen- 
tial responses. You'll love the 
games, and learn from them as well. 
Copies: Many 

Price: $15.95 

Includes: Disk, game card 
Available: Avant-Garde Crea- 
tions 

P.O. Box 30161 MCC 
Eugene, OR 97403 



Name: 



Data 



System: 
Memory: 
Language: 
Hardware: 



C1 Cassette 
Base Manager 

OSI C1 BASIC-in-ROM 

16K or more 

BASIC 

None special 
Description: A data base manager 
for cassette based systems. Good 
for maintaining mailing lists, article 
or slide lists, etc. Save and read to 
tape, find, sort, list, add to file, 
delete from file, and change file en- 
try are all supported. High speed 
sorts are used. 



Copies: 


Just released 


Price: 


$15.00 on cassette, 




ppd 


Author: 


Mike Cohen 


Available: 


Orion Software 




Associates 




147 Main Street 




Ossining, N.Y. 10562 



Name: Data Factory 3.0 

This is a revised listing 
of the package as 
presented in the 
August issue. 
System: Apple 
Memory: 48K RAM, ROM card, 

Language Card 
Language: Applesoft 
Description: A data base file pro- 
gram of unique utility. It can modify 
one of its own existing data bases 
by adding or deleting fields, chang- 
ing the order of fields, or changing 
the field lengths without having to 
re-enter your data. This is just one of 
the many time and money saving 
features that makes this program so 
powerful! Can never overload your 
diskette; the program informs you of 
your free disk space when entering 
data. Many features! 
Price: $100.00 

Includes: Disk, manual and pro- 
gram 
Author: William Passauer 

Available: Andent, Inc. 

1000 North Avenue 
Waukegan, IL 60085 
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Name: Autodialer II 

System: APPLE II 

Memory: Program -9K 

Data Statements 10K 
Language: Applesoft 
Hardware: APPLE II, APPLE II 
Plus with D.C. Hayes 
Micromodem II 
Description: Comes with over 100 
phone numbers built in that can be 
dialed automatically by the 
micromodem II. Each number can 
have up to 14 lines of information 
(text). Micromodem parity, 
wordlength, transparency, lower 
case mask, and duplex set at the 
touch of a key. Manual dial entry 
too! 
Price: $15.00 (diskette or 

tape) 
Author: Bill Hyde 

Available: Modular Software 
P.O.Box 12883 
San Antonio, TX 78212 



Name: H-EDIT 1.5 

System: APPLE II 

Memory: 32K ROM Applesoft. 
48K with either RAM or 
ROM Applesoft 

(specify which) 
Language: Applesoft, Machine 

Language 
Hardware: APPLE II, APPLE II 
Plus, Disk II, Printer 
optional 
Description: H-Edit is a 'mini' text 
editor which provides the user with 
the ability to create, read and up- 
date moderate size text files. It is a 
line-oriented text file editor used to 
speed up certain edit functions and 
permit any type of character input. It 
will provide you with the ability to 
create or read those 'EXEC files 
that, heretofore, were a nuisance to 
work with. Easy to use. Comes with 
instruction booklet. 
Copies: Just released 

Price: $16.95 Diskette, plus 

$1.50 p&h, first class 
Includes: System diskette, and 

booklet 
Available: ABC Software 
2802 Claude Dove 
Las Cruces, New Mex- 
ico 88001 



Name: 

System: 

Memory: 

Language: 

Hardware: 



STATISTICAL 

APPLE II 

48K 

Applesoft BASIC 

Disk drive, optional 

printer 



Description: A comprehensive 
statistical analysis package for 
econometric work including multi- 
ple linear regression of up to seven 
variables - each can be lagged by up 
to fifteen periods. Correlation with 
fifteen period lag. Seasonal 
analysis - deseasonalising and 
smoothing of series. Data can be 
stored, amended, updated and pro- 
cessed in arithmetic progrm before 
analysis. Handles both monthly and 
quarterly data. 



Price: 
Author: 



Available: 



Name: 
System: 



$69.00 diskette 
Jllllan Knight 

Tripont Assoc. 

Systems Consultants, 

Sunderland, England 

B.W. Ardin 

The White House 

Hutton Gate 

Guisborough, 

Cleveland 

England 



FILEWRITER 

APPLE II, APPLE II 
Plus 

Memory: 2K (plus DOS & op- 
tional RAM Applesoft) 
Language: Applesoft II 
Hardware: Disk II, Printer op- 
tional 
Description: Allows you to write 
random-access disk files with a 
minimal effort. It has many safe- 
guarding features sothat it is very 
hard to make a mistake. It allows 
you to enter commas into your lines. 
The CTRL-0 command allows you to 
use the options the program pro- 
vides. A machine language version 
will soon be available. 
Price: $20.00 (incl. p&h) 

Includes: Diskette, documenta- 
tion, instructions 
Author: S. Grimm 

Available: The Video Stop 
23492 Belaire Ct. 
Los Gatos, CA 95030 



Software Catalog Entries 

Entries to this catalog should be sub- 
mitted in the above format. Only one 
listing per company, per month. Entries 
submitted in other formats or that are 
too lengthy in the description portion, 
will be rejected. This catalog is provided 
free of charge and is on a first come — 
first served basis. Address any inquiries 
to: 

MICRO Software Catalog 

P.O. Box 6502 
Chelmsford, MA 01824 



PROGRESSIVE COMPUTER SOFTWARE 

P405 Corbin Rd., York, Pa. 17403 
(717)845-4954 

C SOFTWARE - HARDWARE - SYSTEMS 
^^ CUSTOM PROGRAMMING 

5 APPL E & H DE 
***** *** 

TEMA H 

The latest in a series ot 
machine language progr am 
development tools lor the 
APPLE. TEMA-2 is a mach- 
ine language debugging aid 
designed to run exactly 
like the mainlrame debug 
programs. 

With TEMA-2 you can 
display or change the content 
ol any register or memory 
location; display the last 4 
stack locations. JSR to any 
subroutine without any 
intertence to the user prog- 
ram flow The direct mode 
also allows display lormat 
testing and Imding ASCII or 
hex strings ol up to 256 
characters A TEMA command 
editor checks all inputs 

C omplet e with TEMA-2 
Traine r (in Ap plesol t or Integer) 
on disk . lor $ 49 95. H D E 
version coming soon 



Write 



complete catalog 




SPEECH 

RECOGNITION 

FOR THE 

ROCKWELL 

AIM-65 



Introducing COGNIVOX SR-100. 
16 word vocabulary, up to 98% 
recognition rate. Connects to 
application port, includes mike, 
cassette with software and manual. 
Requires 4K RAM on your AIM. 
Breakthrough price only $119 (CA 
add 6% sales tax). Order direct 
from: 

VOICETEK 

P.O. Box 388 Goleta, CA 93017 




6502 Bibliography: Part XXV 



Dr. William R. Dial 

438 Roslyn Avenue 

Akron, OH 44320 



703. (cont'd) Compute II, Issue 1 (April/May 1980) 

Schwartz, Daniel, "Machine Language Tapes for OSI 

Challengers," pgs. 52-53. 

Routines to enable the C1 computers to store machine- 
languages on tape. 

Hawkins, George W., "Songs in the Key of KIM," pgs. 52-53. 
Several song tables are given for Richard Martin's "Four 
Part Harmony" on the KIM. 

Carlson, Edward H., "Fast Tape Read/Write Programs for 
Your OSI," pg. 56. 

A complete listing for the KC fast tape Read for the OSI 

computers. 

704. Abacus 2, Issue 3 (March 1980) 

Banks, Guil, "Fresh D.O.S.," pgs. 2-3. 
This routine allows the user to replace a crashed DOS on 
a disk without disturbing the data on the other tracks. 

Anon., "Restore LN," pgs. 3-4. 
This subroutine for the APPLE does a 'restore LN' where 
LN is a user-supplied line number. 

Anon., "Computer Equivalents Chart," pg. 5. 
A chart to help with binary and hex arithmetic; APPLE 
listing. 

Davis, James P., "Truth Tables," pg. 6. 
An interesting set of relationships on logic statements. 

Davis, James P., "Programs," pgs. 7-8. 
A series of short routines for the APPLE. 

Crossman, Craig, "Fun with Assembler; An Assembly 
Language Tutorial," pgs. 9-11. 
A tutorial. 

Anon., "System Configuration," pg. 11. 

A program to figure out what cards are in your APPLE 
slots. 

705. Dr. Dobb's Journal 5, Issue 5 (May, 1980) 

Barker, Lee, "Help with OSI's CPM," pgs. 36-37. 
A modified listing of the OSI ten routines that corrects a 
few problems. 

706. Nibble 1, No. 2 (April, 1980) 

Micro-Sparc Staff, "Low Resolution APPLE Shape-Writer," 
pgs. 7-8, 46-47. 
A program to assist in APPLE graphics. 

Anon., "Quick and Easy," pg. 11. 

Bring those decimals into line, for the APPLE. 

Anon, "Short and Sweet File Names," pg. 11. 
A time and space saving routine. 

Anon., "How to Build and Wire Joysticks," pgs. 12-13. 
Joysticks for the APPLE, a hardware article. 



707. Call — APPLE 3, No. 3 (March/April 1980) 

Reynolds, Lee, "Multiple Dimension Arrays in Integer 
BASIC," pgs. 7-11. 

Extend the utility of your Integer BASIC for the APPLE. 

McVay, Ray, "Integer BASIC Post-Editor," pgs. 13-16. 
An illegal statement writer for the APPLE. 

Dunmire, Darrell, "Personify," pg. 17. 
Personalize your disks with this routine which prints over 
the label 'disk volume.' 

Huelsdonk, Bob, "Making BASIC Behave," pgs. 18-19. 
Several useful routines for the APPLE. 

Throop, Wayne, "Auto-Number for Applesoft," pgs. 20-24. 
A convenient utility which can be used with Applesoft 
BASIC on the APPLE. 

Golding, Val J., "Modifying the Program Line Editor Escape 
Table," pg. 24. 

Define your own key functions with this routine. 

Golding, Val, J., "Menu," pgs. 26-27. 

Use letters to call up your menu items with this APPLE 
utility. 

Winston, Alan B., "The Multi-Lingual APPLE," pgs. 28-29. 
Three listings for Pascal users. 

Pilloff, Hersch, "Stock Market Data Retrieval on The Source, 

pgs. 30-31. 

Discussion of commands and procedures for using UPI 
UNISTOX on THE SOURCE with the APPLE. 

Aldrich, Ron, "Ron's DOS Command Finder," pg. 31. 

Program to print DOS commands and addresses on the 
APPLE. 

Golding, Val J., "Benchmarking the Micros," pgs. 33-34. 
In eight benchmark programs, the APPLE averaged faster 
speed than most other micros. In another case, Integer 
BASIC showed up a hair faster than an IBM 370/115 main- 
frame. 

Beck, Maj. Peter M., "Shape Display Utility," pg. 39. 
A useful graphics utility for the APPLE. 

Gibbs, Terrell T., "Do a HPLOT of Page 2," pg. 41. 

How to do HIRES animation by switching from page 1 to 
page 2 on the APPLE. 

Flanagan, Dale, "Lower Case for APTYPE," pg. 42. 
Changes to allow the APTYPE program to be used on AP- 
PLEs equipped with the Paymar chip for lower case. 

Stadfeld, Paul, "A Bug in the Autostart ROM," pg. 42. 
A fix for a microbe in the ROM. 

708. The Apple Orchard 1, No. 1 (March/April, 1980) 

Crossley, John, "Applesoft Internal Entry Points," pgs. 12-18. 
The initial issue of the new Apple Orchard publication of 
the International Apple Core contains very good articles, 
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many of which have been abstracted before in this 
bibliography. This article on the Applesoft entry points is 
one of several reference sources contributed by Apple 
Computer. 

Hyde, Randall, "Connecting with the USCD BIOS," pgs. 
25-33. 

An APPLE Pascal utility. 

Stout, Bob, "Software Development Tools for the Apple II," 

pg. 1. 

From the Apple Barrel. The first of a series of articles 
dealing with tools for the Apple. This one deals with a 
debugger. 

Crosby, Mark L, "Shaping Up with the APPLE II," pgs. 37-45. 
Listings for two utilities, SHAPE DESIGNER and SHAPE 
ASSEMBLER. Contributed by Washington Apple Pi. 

Hyde, Randall, "Converting Brand X to Work with Brand Y," 
pgs. 47-48. 

There is BASIC and then there is BASIC, but the twain 

shall meet. 

Deegan, W. Curt, "APPLE Typer," pgs. 62-65. 
Two utilities, APPLE Typer and Trim Print, as well as 
Typer II, contributed by Apple Gram. 

Hyde, Randall, "Converting Integer BASIC Programs to 

Assembly Language," pgs. 67-71. 
A tutorial on Assembly language contributed by Ap- 
plesauce. 

Wurzel, Bill, "The Language System — The APPLE Grows 
Up," pgs. 74-77. 
All about Pascal, contributed by Washington Apple Pi. 

Deegan, Curt, "Hex-ASCII Memory Dump," pgs. 79-80. 
A utility for the APPLE, contributed by Apple-Gram. 

Rivers, Jerry, "DOS Tidbits," pgs. 83-86. 

Notes on disk files for the APPLE, contributed by Apple- 
Gram. 

Suitor, Richard F., "Disk Bootstrap without ROM," pgs. 
95-96. 

A utility for disk users, for the APPLE. Contributed by 

NEAT Notes. 

Knevels, Paul, "The APPLE Rumor Mill," pg. 96. 
Suggested Op-codes for a microprocessor. Contributed 
by Apple-Gram. 

709. NW Suburban Apple User Group Newsletter 1 (July 1979) 

Russ, John, "A Real-Time Clock Display for the Apple Using 
the Mountain Hardware Board," pg. 1. 

A machine program with explanations of the clock 

works. 

710. NW Suburban Apple User Group Nwslt 3 (August 1979) 

Lyle, Guy, "Memory (And Other Things Which I Forget," pgs. 
1-5. 
An instructive article on the APPLE Memory. 

Russ, John, "Hello There!" pg. 5. 

A graphics program for the APPLE. 
Alpert, Dave, "Dave's Peeks," pg. 8. 

How to read or use editing controls on long catalog 

listings that scroll off the APPLE'S screen. 

711. 73 Magazine, No. 236 (May 1980) 

Smith, Bill, and Williams, Rich, "Breakthrough! — A Com- 
puterized Antenna Rotator," pgs. 86-94. 
A ham radio utility using the KIM-1. Hardware and listing. 

712. Apple Peel 1 No. 2 (Sept. 1979) 

Jenkins, Jerry, "Maxwell Character Generator," pgs. 4-5. 
A useful new graphics utility for the Apple. 



713. Apple Bits (April, 1980) 

Wysocki, Tom, "Program Page List," pg. 4. 
A machine language APPLE utility. 

Kovalik, Dan, "Taking the Mystery and Magic Out of 

Machine Language," pgs. 7-8. 
A program to allow APPLE users to select any of the 
available text or graphics modes by pressing only one key 
rather than typing in a command or doing a poke. 

Martie, Ed, "Investing a Different Way," pg. 11. 
Use your APPLE to improve your chances at the track — 
can be very practicable! 

714. NW Suburban Apple User Group Newslt (Sept. 1979) 

Russ, John, "Formatting Numerical Input and Output," pg. 
1-3. 

Dress up the numbers or dollar/cents reporting in your 

program. 

715. NW Suburban Apple User Group Newslt (October 1979) 

Hartley, Tim, "Disk Volume Modification," pg. 6. 
On the APPLE, how to replace "Disk Volume XXX" with 
"Tim's Disk #XXX." 

716. 73 Magazine No. 236 (May 1980) 

Walker, Bill, "VHF Signal Diffraction," pgs. 56-57. 

Let your APPLE show why your ham signal may not be the 
best with the highest antenna. 

717. NW Suburban Apple User Group Newslt (Nov. 1979) 

Tapper, Rick, "Creating a Shape Table," pg. 1. 

Russ, John and Russ, Chris, "Screen Access in HiRes," pgs. 
3-4. 

A tutorial on graphics programming. 

718. Washington Apple Pi 1 No. 10 (Nov. 1979) 

Crosby, Mark L., "Kaleido-Shape," pg. 8. 
A shape-drawing graphics program for the APPLE. 

719. NW Suburban Apple User Group Newslt (Dec. 1979) 

Allen, Earl, "Applesoft Error Handling Routines," pgs. 1-9. 
Examples using the ONERR statement on the APPLE. 

Anon., "Control Character Locator," pg. 9. 

Here is a neat routine on the Apple to find hidden control 
characters. 

Alpert, Dave, "Dave's Peeks," pg. 10. 

Locations in the APPLE Monitor for the prompt sign, 
HIMEM, LOMEM, Program pointer, Speed, etc. 

720. Interactive Issue No. 1 (April 1980) 

Anon., "Using EPROMS in AIM 65," pg. 3. 
Helpful hints for using EPROMS in the AIM. 

Anon., "AIM-65 Application Notes," pg. 4. 
A list of eight Application Notes published by Rockwell 
forthe6502/AIM65. 

Anon., "AIM 65 Symbol Table Routine, " pg. 4. 

Here is a short relocatable routine that will assist in ob- 
taining a symbol table from an assembly. 

Boisvert, Conrad, "A Couple of 6522 Applications Notes," 
pg. 9-10. 

Generating Long Timed Intervals, Generating a 1 HZ 

Squarewave Signal. 

Editor, " TTYTIP," pg. 12. 

Notes on using the AIM-65 at terminal speeds of 2400 and 
above. 
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6502 745 10 @ 695 50 9 6.55 100 @> 6 15 

6502A 840 10 P 795 50 @ 7.35 100 (°> 690 

6520 PIA 515 10 <S> 490 50 @ 445 100 9 415 

6522 VIA 6.90 10 @ 6.70 50 @ 6.15 100 ®5.50 

6532 790 10 9 740 50 @ 700 100 (3 6.60 

2114-L450 4 75 20 9 445 100 9 415 

2114-1300 595 20 9 545 100 5.10 

2716 EPHOM 21.00 5 9 1900 10 9 17.00 

4 116- 200ns RAM 700 8 9 6.25 

6550 RAM (PET 8K) 1270 

21L02 90 

S-100 Wire Wrap $285 10 Si 265 

S- 100 Solder Tail $235 10 9 215 

DISKS 

(write tor quantity prices) 

SCOTCH 8" Disks 10/S31.00 

SCOTCH 5»" Disks 10/S31 .50 

Verbatim 5V Disks 10/S24.50 

Diskette Storage Pages 1 0/$ 3.95 

Disk Library Cases 8 " - $2.95 5 " - $2. 1 5 

BASF SW Disks 10/S25.00 

BASF 8" Disks 10/S27.00 



APProducts 
1596 OFF 

PET 4 Voice 

Music System 
Zenith Z-19 
KIM-1 
SYM-1 
KTM2/80 
Leedex Monitor 



$ 60 

$770 
$159 
$209 
$349 
$129 



CwtTMta737 $8001 

All books 15% Off 



CASSETTES 

AGFA PE-61 1 

in 5 screw housing 

C-10 10/5.65 100/48.00 
C-20 10/645 100/57.00 
C-30 10/7.30 100/66.00 
All other lengths 
available. Write for 
price list. 



ATADI INTRODUCTORY SPECIAL 

MIMKI jur, ioo Atjr, oOO anaa<' Atar Miiowes 20°oOFF 



COMMODORE PET-CBM 

Write or call (or quotes 

NEW 8016/32 80 Column Screen 

NEW 8050 950K Dual Drive 

EDUCATIONAL DISCOUNTS 

AVAILABLE 




WRITE FOR CATALOG 

Add $1 .00 per prepaid order for US shipping (UPS) 



_ n , 115 E. Stump Road 

A D LOmpUterS Montgomeryville. PA 18936 

' (215)699-5826 




AT LAST! 

A magazln* davotad to Application/! a% 
wall aa Tachnlqua for tha Apple Computoi 

THE APPLE SHOPPE WILL TEACH VOU MOW TO 
DO ALL THOSE FANCY THINGS ON THE APPLE. 
LEARN HOW OTHERS ARE USING THEIR 
APPLES IN THE HOME. SCHOOLS AND BUSI- 
NESSES. 




CHECK THESE FEATURES: 



•f Feature Articles on Apple Applications 
X* Program of the Monlh— -How To' wilh Listings 
\S New Products Review— All Boards. Pascal, etc. 
\/* Language Lab— Learn Basic. Pascal. Forth. Lisp. Pilot 
l/ Future Projects— Participate in a new program design 

called "The China Syndrome" 
v/ Graphics Workshop— Learn secrets lormerly known only 
to "Super Pi 



I I Y ES I want to learn how to got the most out ot my Apple. Send me a one year 

subscription. I enclose $12. 



ADDRESS: 
CITY 



D NO. 1 already know It all, Out send me a tree sample ol next issue. 

Send check or money order to: Apple Shoppe. P.O. Box 701. Placentia. CA 92670 
or call (714)996-0441 



THE FLOPPY DISK ALTERNATIVE 



• transfers at 4800 baud 



PET/BETA-1 




FLEXIBLE DATA MANAGEMENT . . . MICRO-PROCESSOR 
CONTROLLED BETA-1 UNIVERSAL TAPE DRIVE BY MECA' 
PERIPHERAL DEVICE WITH COMPLETE SOFTWARE SUPPORT' 



SPEED 



STORAGE 



OPERATING 
SYSTEM 



FILE 
CONTROL 



Loads and saves at 4800 baud. Seeks at 100'Vsec 

Each BETA-1 drive stores 525.000 bytes or 126 named programs or 
files on a single cassette. Expands to four drives-two megabytes 

24 commands. 27 error messages. 2 user-defined commands-fully 
compatible with PET 8ASIC. Resides in only 4K-abbreviated 2K 
version, bootstrap loader, all romable 

Named files, directories, program chaining and merging, sequential and 
random access files, field and record definitions, and more . . . 



• 500 K storage per drive 

• complete hardware and 
software system 

Meca's digital tape provides the 
features of disk plus gives you 
more storage and costs less. 

LOAD AND SAVE AT HIGH SPEED 

Eliminate those piles of cassettes cluttering up your life. Organ- 
ized on a single cassette, your present collection of programs be- 
comes a named program library. You load and save any program 
in seconds, instead of minutes. In addition to fast, convenient, 
reliable program storage, huge amounts of textual and numeric 
data can be accessed quickly and easily. With up to two mega- 
bytes on line, programs for mailing lists and business records are 
practical. 

This is a complete system. Just plug it in and go. Additional soft- 
ware is available. 

BETA-1 DRIVE. PET/BETA-1 OPERATING SYSTEM. MANUAI S555.00" 

ADDITIONAL BETA-1 SLAVE DRIVES 310.00 

MANUAL (applicable to purchase) 10.00. 
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1903 Rio Grand* 

Ausrtin.Toxas 

78705 
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1-312-477-2287 
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P.O. Box 8483 

Austin. T*xa* 

78712 




.+ fih * 



»*• 










Dr. DoBB'S ToURNALof 

COMPUTER 



V^alisth 



enics 



(5 vJrthodont 



1a 



Running Light Without Overbyte 



Twelve Times Per Year 



$21/1 Year- $39/2 Years 




Recent issues have included: 

ZX65: Simulating a Micro 

Indirect Addressing for the 8080 and Z80 

A Z-80 Circuit for the H-8 

A Small C Compiler for the 8080's 

The C Programming Language 

What you see is what you get. 



To subscribe, send your name and address to Dr. Dobb's Journal, 
Department V4, Post Office Box E, Menlo Park, CA 94025. 

We'll bill you. 
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The ONLY 'PLUG IN AND GO' VIDEO BOARD for Both 
the Beginning and the Sophisticated System Builder! 




FEATURES 
ASK VIDEO PLUS II ™ Software EPROM 

Fully AIM, SYM, KIM, Compatible. Works with 
Monitors, BASIC, Editors. Observes all Standard 
Programming Conventions. 

Supports AIM keyboard, upper and lower case, or 
any ASCII keyboard. 

Fast Scrolling and Flicker-free Operation 
ASK Software fully supports all VIDEO PLUS II op- 
tions. 

VIDEO PLUS II Hardware 

EPROM Character Generators provide for 

128 Character Set with 2716 EPROM, 

or 256 Character Set with customer furnished 

2532. 

Programmable Character Size 

Selective Character Blank/Unblank 

Improved Keyboard Interface 

Reverse Video 

VIDEO PLUS II Additional Capabilities 

Up to 2K Display RAM, 2K Program Character 

Generator 

6502 Stand-alone Operations 

ACIA Communications Provision 

Handles RS 232 and 20MA Current TTY 

loop. 

Programmable baud rates, 50 to 19.2K baud. 



BENEFITS 

Instant Video Display Capability 
Simple cable connection provides for easy 
installation, and immediate use: simply 'plug in 
and go.' Standard Options are available to meet 
user's requirements for future major system im- 
provements. 



Display requirements may be tailored to meet 
actual application requirements on an individual 
basis. User may specify character set, height, 
width and spacing in accordance with specific ap- 
plication display and man/machine requirements. 
2000-4000 characters or limited, high resolution 
graphic screen displays. 



VIDEO PLUS II supports major system 
enhancements which can significantly extend a 
product's life cycle. Any combination of options 
may be specified. Additional capability may be 
added to meet changing application requirements 
or planned product line improvements. 



VIDEO PLUS II — Provides Unexcelled Cost/Performance 

STANDARD BOARD — $295.00 Includes: ASK VIDEO Software EPROM, Character Generator EPROM (2716), 
RAM 1K, Configuration DIP Switches (24), and CRT Controller. Options: Additional 4K RAM — 
$50.00. 6502 Stand-alone Options — $20.00. Communications Option — $35.00. 

DEALER and OEM QUANTITY DISCOUNTS AVAILABLE 
All prices shown are US and Canadian only, and are exclusive of shipping charges and applicable taxes. Other improved 
products include MOTHER PLUS II, PROTO PLUS II, A PLUS II, and AIM PLUS II. Volumes shipments for all PLUS II pro- 
ducts commence Oct. 1, 1980. For more information contact: 



I — i ran 

* 34 Chelmsford St.. Chelmsford, MA. 01 824 617/256-3649 
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Cost Effective Systems for the 
Microcomputer OEM . 



Ohio Scientific has been building small 
business microcomputers and personal 
computers since the beginning of the 
microcomputer revolution. Most Ohio 
Scientific products incorporate a bus 
architecture utilizing modular circuit 
cards mated to a multi-slot backplane. 
Ohio Scientific's 48 signal line bus is 
designed to effectively marry the versa- 
tility and modularity of bus architecture 
with the economies of consumer products 
producing an ultra-low cost yet reliable 
system. Many industrial users of micro- 
computers recognize the economy and 
versatility of Ohio Scientific's modular 
computer boards and utilize these boards 
and subsystems as well as customers 
who purchase complete computer 
systems on an OEM basis. 

Ohio Scientific's 
New OEM Program 

Ohio Scientific now recognizes the 
importance of the OEM marketplace and 
is introducing a complete program for the 
board level OEM user as well as the 
system OEM. The program starts with our 
standard products including three CPU 
boards, a broad range of static and 
dynamic memory boards, mini and 8" 
floppy disk controllers, printer controllers, 
multiple RS-232 port boards, a hard disk 
controller, and video interface with 
optional keyboard. Backplanes with two, 
four, eight or sixteen slots are available. 
These standard products are now being 
supplemented by a broad range of 



products specifically for the OEM user 
including: 

• New universal telephone interface 
board which has auto-dial capability, 
auto-answer capability, tone encoding 
and decoding, answer and originate 300 
baud modem and voice I/O via tape 
recorder or optional phonetic voice 
output system. 

• New calendar-clock with several month 
battery backup capability which can be 
programmed to automatically restart 
the computer or shut off the computer at 
set times. The circuit board also 
includes automatic power-fail restart 
capability. 

• Instrumentation quality high speed, 

1 2-bit analog A/D - D/A module with a 
1 6-channel input multiplexer and two 
1 2-bit D/A converters. 

• A large range of parallel interface 
options including circuit cards contain- 
ing 48 parallel I/O lines. 

• New solderless prototyping board which 
connects to the computer system 

and allows rapid prototyping of new 
interface ideas. 

• System PROM blaster which accepts 8K 
through 64K bit industry standard 
EPROMS and a universal EPROM-ROM 
card. 

• A card edge extender, bus analyzer and 
bus compatible breadboards. 

Documentation 

All of Ohio Scientific major circuit boards 
are now fully documented by Howard 
Sams (the originator of the Sams Photo- 
fact series for Consumer Electronics) 

servicing manuals which include 
to block diagrams, schematics, 
detailed pictorials, parts place- 
ment diagrams and parts lists 




providing the designer, systems integrater 
and serviceman with detailed hardware 
information. Ohio Scientific is offering 
qualified OEM users its principal disk 
operating system (OS-63D V3.2) which 
supports multiple languages, mini-floppies, 
8" floppies, printers, modems and other 
accessories in documented Source Code 
and machine readable form which can be 
reassembled on standard OSI computers. 
This gives the product developer the 
ultimate flexibility in integrating these 
components into his total system design. 

Best of all is the Price 

Because of Ohio Scientific's hundreds of 
thousands of boards per year volume for 
the consumer and small business market, 
these products cost a mere fraction of the 
corresponding LSI-11 , SBC or S-100 bus 
boards. This economy allows you to utilize 
a floppy subsystem in your product at a 
total cost typically less than an EPROM 
based system from other vendors. 

Ohio Scientific's reasonably priced 
universal telephone interface and voice 
output capabilities allow you to integrate 
advanced telecommunications, remote 
control capabilities and/or unlimited 
vocabulary voice response in your 
systems at the same price as a "bare 
bones" implementation with other bus 
architectures. 

Easy to Start With 

Getting started with the OSI bus architec- 
ture is now easy with documentation, off 
the shelf availability, and economical 
computer systems for in-house software 
development using Assembler, BASIC 
FORTRAN or PASCAL. Ohio Scientific's 
new OEM contract provides easy to start 
with terms and generous volume 
discounts. 

For more information and the name and 
phone number of your local Ohio 
Scientific OEM representative call 
1-800-321-6850 toll free. Please specify 
your interest as an OEM user. 



1333 SOUTH CHILLICOTHE ROAD 
AURORA, OH 44202 • [21 B] B31 -5600 
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